Регистрация
MasterHacker
22.06.2023 02:47
Информатика
Есть ответ 👍

Вычислить сумму чисел от 10 до 70, чисел кратных 4

184
383
Посмотреть ответы 2

Ответы на вопрос:

maxjk19
maxjk19
4,8(84 оценок)
Var i,s: integer; begin s: =0; for i: =10 to 70 do   if i mod 4 = 0 then s: =s+i; writeln('s = ',s); end. результат: s = 600
Samuel11
Samuel11
4,5(11 оценок)
Program ex; const   n=200; var   i,x: integer;   f: file of integer;   f2: text ; begin   assign(f,'pervuy.txt');   assign(f2,'vuxod2.txt');   rewrite(f);   for i: =1 to n do write(f,i*5);   close(f); reset(f);   rewrite(f2);   for i: =1 to n do begin       read(f,x);       write(f2,x,' ');       end;   close(f); close(f2) end.

Популярно: Информатика