Помогите пожалуйста. (Составить программу решения задания с использованием цикла с заданным числом повторений. ) Написать программу, которая вычисляет сумму всех чётных чисел в диапазоне от 1 до n.
Ответ:
program z1;
var n,i,s: integer;
begin
write ('n = ');
readln(n);
s:=0;
for i:=1 to n do if i mod 2 = 0 then s:=s+i;
write('s = ',s)
end.
Нет, нужно только составить программу с использованием цикла с заданным числом повторений т.е.там не должно быть if, then.
Оператор выбора служит для определения является ли число четным.
Значит, без этого решить задание невозможно?
Да. Используя цикл мы перебираем все цифры от 1 до n, но получить надо сумму чётных чисел, поэтому мы используем оператор выбора: если число чётное, то суммируем.
Спасибо