Ответ 30 удачная контрольной
var
a, b: integer;
begin
write('введите две стороны = >');
readln(a, b);
writeln('периметр = ', 2 * (a + b));
writeln('площадь = ', a * b);
end.
Выведится:
Привет,это я,умный компьютер
Я знаю,что 6*5=30
Ето о чем-то рассказывается, о чём то повествуется, о чём то повидомляется