Question

написать программу печатующую все четные числа от 2 до 100,включительно. Помогитеееееееее

Answer 1

user crt;
var i,s:integer;
begin;
for i:=2 to 100 do;
if(i mod 2 = 0) then writeln(i);
end.