Написать программу, которая вычисляет и печатает объемы цилиндров высотой h=20 и...

July 2022 1 16 Report

Написать программу, которая вычисляет и печатает объемы цилиндров высотой h=20 и радиусами оснований от 1 до 15.
НАПИСАТЬ ПРОГРАММУ НУЖНО В ПАСКАЛЕ

Answers & Comments

pacixor var
h, i: byte;
z: real;
begin
h := 20;
for i := 1 to 15 do
writeln('Объем цилиндра с основанием ', i, ' = ', (pi * (i * i) * h):2:2);
end.

0 votes Thanks 2

AlexOge спасибо большое, можешь мне объяснить как это вообще делается, а то я к оге подготавливаюсь и не могу понять как это всё делается

pacixor Отредактировал программу. Первый раз перепутал формулу.

pacixor Это основы основ, как 2 + 2. Я незнаю как это объяснять.

AlexOge а какую ?

AlexOge блин

AlexOge ну ладно спасибо всё равно

pacixor pi * (i * i) * h это формула для вычисления объема цилиндра по высоте и радиусу основания.

pacixor i = радиус основания. h = высота цилиндра. pi = число пи. i * i = квадрат числа i, т.е. квадрат радиуса основания.

AlexOge спасибо

Answers & Comments

Helpful Links

Helpful Social