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

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

Question

Информатика

Никифор

5 марта, 23:47

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

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

+4

Ответы (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.