Question

помогите с инфой. плиз, кто шарит в паскале.
нужно составить программу в ABC паскале
"напишите программу вывода всех четных чисел от 2 до 100 включительно"

Answer 1

program test;

uses crt;

var i: integer;


begin

clrscr;

for i:=1 to 100 do begin
if I mod 2 = 0 then  writeln (I);
end;
readkey;
end