Предмет: Информатика,
автор: Elmir03042003
Паскаль. Найти сумму четных чисел от 15 до 100.
Elmir03042003:
добавил
с тобой изи 5 по информатике)
а не 3 или 4(
У меня беда с русским кстати. Мне тоже наверное помогать будешь ок?)
в принципе могу. по истории я спецназ, если что.
кстати я могу порекомендовать людей которым нужно будет помочь
по истории
не... спасибо. у меня с историей все гладко. учусь в школе с профи по информатике.
ржака
там, ксати, внизу точно такая же задача. решение уже удалили. можешь повторно написать и баллы получить, если хочешь.
Ответы
Автор ответа:
1
var
i, k: integer;
begin
k := 0;
for i:=15 to 100 do if i mod 2 = 0 then k:=k+i;
write(k);
end.
Автор ответа:
0
begin
Range(15, 100).Where(el -> el.IsEven).Sum.Println;
end.
Похожие вопросы
Предмет: Химия,
автор: lipkakseniya07
Предмет: Химия,
автор: svetlana6468
Предмет: Українська література,
автор: mezatonka
Предмет: Математика,
автор: Аноним
Предмет: Алгебра,
автор: gdgdgd1