Question

Запиши программу в Паскале для вычисления площади прямоугольника со сторонами a и m​

Answer 1

program gwr;

var

 a,m :integer;

 begin

  writeln('Введите чему равны стороны прямоугльника: ');

  readln(a,m);

  writeln('Площадь прямоугльника равна ', a * m)    

 end.