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