Напишите программу на Pascal:

Вычислить площадь боковой поверхности прямой призмы с боковым ребром (а), в основе которой находится квадрат со стороной (в). (Предварительно найти периметр основания).

Question

Информатика

Ольга

6 мая, 22:39

Напишите программу на Pascal:

Вычислить площадь боковой поверхности прямой призмы с боковым ребром (а), в основе которой находится квадрат со стороной (в). (Предварительно найти периметр основания).

+1

Ответы (1)

Знаете ответ на вопрос?

Феодор · Answer 1

Program prisma;

var

a, b, p, s: real;

begin

write ('a=') ;

readln (a) ;

write ('b=') ;

readln (b) ;

p : = 4 * b;

s : = p * a;

writeln ('площадь боковой поверхности: ', s:1:2) ;

end.