Напишите программу на языке Паскаль для решения - вопрос №12907542 от Ахаахсхвхахэпахэаээа 18.08.2020 04:58

Question

Информатика: Напишите программу на языке Паскаль для решения следующей задачи: Дан квадрат со стороной a и равносторонний треугольник со стороной b. Чей периметр меньше?

Ахаахсхвхахэпахэаээа · Answer

var a, b: integer;

begin

readln(a, b);

a:= a*4;

b:=b*3;

if a > b then writeln('Периметр квадрата больше')

else writeln('Периметр треугольника больше');

end.