Составьте программу для вычисления периметра равностороннего треугольника .
program Perimetr;
var
D : integer;
begin
writeln(Dlina storon: );
read(D);
D := 3 * D;
writeln(Otvet,D);
end;
Оцени ответ
Вход
Регистрация
Задать вопрос
Составьте программу для вычисления периметра равностороннего треугольника .
program Perimetr;
var
D : integer;
begin
writeln(Dlina storon: );
read(D);
D := 3 * D;
writeln(Otvet,D);
end;