Question

СРОЧНО ПОЖАЛУЙСТА
написать через PascalABC
8 класс, срочно​

Answer 1

Ответ:

program ploshad;

uses crt;

var s,r,h:real;

begin

write('высота цилиндра = '); readln(h);

write('радиус цилиндра = '); readln(r);

s:=2*pi*r*h+2*pi*r*r;

writeln('Площадь цилиндра = ',s);

end.