Информатика!Написать программу в Паскале! Задано целое положительное число N>1. Вычислить сумму четных целых чисел в
диапазоне [1..N].

Важно! Для решения задач использовать цикл с предусловием!

Question

Информатика: Информатика!Написать программу в Паскале! Задано целое положительное число N 1. Вычислить сумму четных целых чисел вдиапазоне [1..N]. Важно! Для решения задач использовать цикл с предусловием! ​

olezhkash228 · Answer

var   n,s,i : integer;begin   s:=0; i:=0;   write( N = ); read(n);   while n i do      begin  i:=i+1;  s:=s+i;      end;   writeln( Сумма , n, чисел = ,s);end....

Популярные вопросы