Составить программу решения задания с использованием - вопрос №12557625 от SMokKK 21.02.2021 06:21

Question

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

SMokKK · 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....