Составить программу решения задания с использованием - вопрос №12557291 от хитрыйкот 25.04.2023 00:48

Question

Информатика: Составить программу решения задания с использованием цикла с заданным числом повторений. ) Написать программу, которая вычисляет сумму всех чётных чисел в диапазоне от 1 до n.

хитрыйкот · Answer

program z1; var n,i,s: integer; beginwrite ( n = ); readln(n); s:=0; for i:=1 to n do if i mod 2 = 0 then s:=s+i; write( s = ,s) end....