Составьте программу, вычисляющую периметр P и площадь S прямоугольника, если известны две его стороны a, b. Вывод на экран оформить следующим образом:

введите две стороны прямоугольника в см:

13.5

47.25

периметр прямоугольника равен 121.5 см

площадь прямоугольника равна 637.875 кв. см

в паскаль

Question

Информатика

Поля

6 августа, 16:31

Составьте программу, вычисляющую периметр P и площадь S прямоугольника, если известны две его стороны a, b. Вывод на экран оформить следующим образом:

введите две стороны прямоугольника в см:

13.5

47.25

периметр прямоугольника равен 121.5 см

площадь прямоугольника равна 637.875 кв. см

в паскаль

+5

Ответы (1)

Знаете ответ?

Манюха · Answer 1

Program Pl;

var a, b:real;

begin

write ('Сторона а=') ;

readln (a) ;

write ('Сторона b=') ;

readln (b) ;

writeln ('Периметр прямоугольника = ', a*2+b*2) ;

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

End.