Составить программу решения задания с использованием - вопрос №12557123 от али426 30.09.2021 23:56

Question

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

али426 · 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....