Информатика кто в этом понимает кому не сложно ребят заранее благодарен
101
473
Ответы на вопрос:
Var i, sum, n : integer; begin sum : = 0; for i: =1 to 10 do begin write("введите число: "); readln(n); if (n div 3 < > 0) then sum : = sum + n; end; writeln("сумма = ", sum); end.
Популярно: Информатика
-
Jama13320.11.2020 23:18
-
grange24.02.2022 19:31
-
Forest23406.05.2021 16:06
-
sasha244210.03.2022 05:33
-
alexc12331.07.2020 23:16
-
Ник123321113.08.2021 13:32
-
SkvidLe26.06.2021 05:18
-
viktoriabuble10.06.2021 15:05
-
soffia24200418.05.2023 22:27
-
dukto555512.11.2021 18:55