Написать программу вывода всех четных чисел в диапазоне от 2 до 100 блоксхема
Vari:integer;beginfor i:=2 to 100 doif i mod 2 = 0 thenwrite(i, ' ')end.