Информатика 9 класс.

Напишите на языке паскаль (турбо-паскаль) как вычислить площадь и периметр прямоугольника.

Ленивые Вы ... Яша давно знает ответы ... Это уже тут и было

var a, b:integer;

begin

writeln ('Введите стороны a и b') ;

writeln ('Введите сторону a') ;

readln (a) ;

writeln ('Введите сторону b') ;

readln (b) ;

writeln;

writeln ('Периметр = ', (a+b) * 2) ;

writeln ('Площадь = ', a*b) ;

readln;

end.