Предмет: Информатика,
автор: strelasupersta
Напишите пожалуйста программу на Паскале составте программу для вычечления периметра равностороннего треугольника длинна видите на клавиатуре,
пажайлуста очень нада ЗАРАНИЕ СПАСИБО
Ответы
Автор ответа:
0
program perimetr;
var n,p: integer;
begin
readln (n);
p:=n*3;
writeln (p);
end.
var n,p: integer;
begin
readln (n);
p:=n*3;
writeln (p);
end.
Автор ответа:
0
Program perimetr;
uses crt;
var a,p:integer;
begin
read(a);
p:=a*3;
writeln('Периметр равен ',p);
readkey;
end.
uses crt;
var a,p:integer;
begin
read(a);
p:=a*3;
writeln('Периметр равен ',p);
readkey;
end.
Интересные вопросы
Предмет: Математика,
автор: togdorz
Предмет: Английский язык,
автор: sofyasamsonova07
Предмет: Химия,
автор: adinaisaeva0905
Предмет: Химия,
автор: Daniliator
Предмет: Алгебра,
автор: dinabtv