Составить программу решения задания с использованием - вопрос №12556948 от KoNetik2020 06.12.2021 11:31

Question

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

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