Question

вычеслите площадь прямоугольника S=a*b​

Answer 1

Ответ:

program ebatkopatmatesha;

var

a,b:longint;

put:integer;

begin

readln(a,b);

put:=Trunc((a+b)*2);

writeln(put);

end.

Объяснение:

var - переменные

logintint/integer - целые типа

a,b - переменные чисел

put:=Trunc((a+b)*2); периметр прямоугольника

writeln(put) выводит результат