Опубликовано 10.06.2017 по предмету Информатика от Гость >> <<

Срочно помогите сделать

Ответ оставил Гость

4) program chetverochka;
var
r,h:real;
const p=3.14;
begin
writeln(vvedite H);
readln(h);
writeln(vvedite R);
readln(r);
writeln(V= , r*r*p*h);
end.
5)program piramidka;
var
s,h:integer;
begin
writeln(vvedite S osnovaniya);
readln(s);
writeln(vvedite h);
readln(h);
writeln(V= , s/3*h);
End.
6)Аналогично пятой.