С пока цикла найти сумму четных чисел от 2 до 100 pascal

Question

Информатика: С пока цикла найти сумму четных чисел от 2 до 100 pascal

Cekretcv · Answer

var_sum, i : integer;begin_sum := 0;i := 2;while (i = 100) dobegin_sum := _sum + i;i := i + 2;end;writeln(_sum);end....

С "пока" цикла найти сумму четных чисел от 2 до 100 pascal