Написать программу на языке паскаль. даны стороны прямоугольника a и b. найти его периметр P=2 * (a+b)

Question

Информатика

Эмилиан

23 марта, 00:10

Написать программу на языке паскаль. даны стороны прямоугольника a и b. найти его периметр P=2 * (a+b)

+4

Ответы (1)

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

Евпраксия · Answer 1

Uses crt;

var a, b, S, P:integer;

begin

write ('a=') ; readln (a) ;

write ('b=') ; readln (b) ;

S:=a*b; P:=2 * (a+b) ;

write ('S=', S,' ','P=', P) ;

end.