Информатика, опубликовано 2018-08-22 22:38:29 by Гость
Найти сумму 23 первых натуральных чисел, которые при делении на 8 дают остаток 5. В паскаль
Ответ оставил Гость
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.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.