Bandilace
4 год назад
100 поинтов! Спасайте! Необходимо составить программу на языке Паскаль, вычисляющую сумму всех чисел, кратных 3 на интервале от 1 до n. Применить цикл с заданным числом повторений.
ОТВЕТЫ
Penka
Oct 24, 2020
var i, s: integer;
begin
s := 0;
for i := 3 div 3 to 60 div 3 do s := s + i * 3;
write(s);
readln
end.
Вроде бы так
903
Смежные вопросы:
