Регистрация
qwertzloygoblinqwert
13.08.2020 12:45
Информатика
Есть ответ 👍

Написать программу распечатывающую сумму всех чисел кратных 3 от 10 до 20

133
454
Посмотреть ответы 3

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

аленаzm
аленаzm
4,4(4 оценок)
Var i,n,s: byte; begin s: =0; for i: =10 to 20 do if (i mod 3=0) then s: =s+i; write(s); end.
Даша2002111111
Даша2002111111
4,6(74 оценок)
Var i,n,a: integer; a: array[1..100] of integer; begin for i: =10 to 20 do if a[i] mod 3=0 then writeln(a[i]); end.
kkmla123
kkmla123
4,7(27 оценок)
Ичто тут надо зделать

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