Найти сумму всех натуральных чисел кратных 5. Информатика. Паскаль.. Created by OwlGlary. informatika-ru

Найти сумму всех натуральных чисел кратных 5. Информатика. Паскаль...

July 2022 1 8 Report

Найти сумму всех натуральных чисел кратных 5. Информатика. Паскаль.

Answers & Comments

ManyGames Var
i, sum, N: integer;

begin
sum:=0;
Write('Введите диапазон чисел (1..N): ');
readln(N);
for i:=1 to N do if i mod 5=0 then sum:=sum+i;
writeln('Сумма всех натуральных чисел, кратных 5-ти, в диапазоне от 1 до ',N,' = ',sum);
end.

3 votes Thanks 4

Answers & Comments

silno proshu reshite 50 ballov hot odnu

help priz srochno dayu 50 ballovnajdite oblast opredeleniya pervoj funkcii a

help pliz srochno 50 ballov najdite oblast opredeleniya funkcii a

srochno 40 ballov hot odno pzh

30 ballov dayu reshite pozhalujsta

s opredelite massu i uskorenie avtomobilya kakuyu moshnost razvivaet dvigatel a

35 ballov reshite ot 3 zadaniya

dayu 50 ballov reshite pozhalujsta227167a5750ee9a193cf2c5e12810339 69846

sostavte predlozheniya pozhalujsto dayu 15 ballov

dayu 50 ballov reshite pozhalujsta2195774c6c7283579d70ea3f41cd0dc2 80263

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

Helpful Links

Helpful Social