Найти сумму 23 первых натуральных чисел, которые при делении на 8 дают остаток 5. В паскаль

Question

Информатика

Надина

7 сентября, 06:41

Найти сумму 23 первых натуральных чисел, которые при делении на 8 дают остаток 5. В паскаль

+4

Ответы (1)

Знаешь ответ?

Колюха · Answer 1

Var i, k, s:integer;

begin

k:=0;

i:=1;

while k23 do

begin;

if i mod 8=5 then

begin;

s:=s+i;

inc (k);

end;

inc (i);

end;

writeln (s);

end.