Написать программу, которая вычисляет площадь прямоугольника
Var a, b:integer; s:integer; begin writeln('Введи длину'); readln(a); writeln('Введи ширину'); readln(b); s:=a*b; writeln('Площадь=', s); end.