Предмет: Информатика,
автор: chemjuliy78
Знайти суму всіх чисел від -1000 до 0, які кратні 18
Ответы
Автор ответа:
0
Pascal:
var i,s:integer;
begin
s:=0;
for i:=0 downto -1000 do begin
if (i mod 18 = 0) then
inc(s);
end;
writeln(s);
end.
Python:
s=0
for i in range(-1000,1):
if i%18==0:
s+=1
print(s)
Похожие вопросы
Предмет: Математика,
автор: Кирилл3009
Предмет: Русский язык,
автор: Vaneksuperpro
Предмет: Математика,
автор: lelikct2013
Предмет: Математика,
автор: асимп
Предмет: Обществознание,
автор: Drak102