Напишите программу, которая зачисляет площадь и периметр прямоугольника по длинам двух его сторон

Question

Информатика

Христофор

25 июня, 04:09

Напишите программу, которая зачисляет площадь и периметр прямоугольника по длинам двух его сторон

+1

Ответы (1)

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

Адина · Answer 1

Program pr;

uses crt;

Var a, b, p, s:real;

Begin

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

readln (a) ;

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

readln (b) ;

s:=a*b;

p:=2 * (a+b) ;

Writeln ('Площадь = ', s) ;

Writeln ('Периметр = ', p) ;

readln;

end.