Напишите программу, которая в последовательности натуральных чисел определяет: 1) максимальное число, кратное 9; 2) минимальное число, кратное 3; 3) сумму чисел, кратных 6. Программа получает на вход количество чисел в последовательности, а затем сами числа. Количество чисел не превышает 1000. Введённые числа не превышают 30 000. Программа должна вывести в качестве ответа на каждый из вопросов ровно одно число.
104
364
Ответы на вопрос:
program qq;
uses crt;
const pi=3.14;
var v,r,h,l,s: integer;
begin
clrscr;
writeln('введите r,h,l');
readln(r,h,l);
v: =trinc((pi*sqr(r)*h)/3); s: =pi*r*l;
writeln('плщадь равна',p,' объем равен',v);
readln
end.
смотри в прграмме есть оператор функция trinc если училке не понравится то v: =((pi*sqr(r)*h)) div 3;
Популярно: Информатика
-
Pan4ugan21.07.2022 00:44
-
fofanchuk12.06.2023 14:17
-
Amarcy03.11.2022 08:26
-
Kpuc210021.03.2023 10:30
-
dianaaloyts30.12.2021 05:59
-
apologise07.08.2022 17:52
-
AndrewLoveRem30.08.2020 07:48
-
mohammadroshann03.06.2020 15:23
-
kostyabriakin19.07.2021 18:43
-
димкаа216.04.2023 09:07