Дано все 3-х значные числа Найти сумму и колличество чисел, кратных 9.. Created by Virus3009. informatika-ru

Дано все 3-х значные числа Найти сумму и колличество чисел, кратных 9...

Virus3009 @Virus3009

July 2022 1 4 Report

Дано все 3-х значные числа Найти сумму и колличество чисел, кратных 9.

Answers & Comments

ИнформатикБУ

Verified answer

Var
i, s, k: integer;
begin
s := 0;
k := 0;
//проверяем все 3-значные числа на кратность
for i:=100 to 999 do
if i mod 9 = 0 then
begin
inc(s, i);
inc(k);
end;
writeln('Сумма: ', s);
writeln('Количество: ', k);
end.

0 votes Thanks 0

Virus3009 Спасибо!

Answers & Comments

Verified answer

paskal dan massiv l soderzhashij 26 elementov v intervale ot 15 do 13 najti m

dan massiv a soderzhashij 30 elementov najti summu elementov bolshih 10

dan massiv m v intervale ot 15 do 30 najti summu i kolichestvo otricatelnyh el

dan massiv k soderzhashij 48 elementa v intervale ot 7 do 43 pomenyat mestami

dan massiv k soderzhashij 38 elementov v intervale ot 20 do 30 zamenit chislom

рекомендуемые вопросы

Helpful Links

Helpful Social