Числовая константа 300 000 может быть записана в виде

(3.0e+5)

Объяснение:

существует несколько стандартных разрешений монитора: 640 на 480, 800 на 600, 1024 на 768, 1280 на на 1024. т.е. 1310720 должно быть произведением этих параметров, получается разрешающая способность 1280 на 1024.

или

1280 x 1024 - это единственное стандартное разрешение, позволяющее вместить на экран ровно 1310720 px

program month;

    uses crt;

    var a: integer;

begin

    clrscr;

    write('vsatvte chislo');

    read(a);

    if (a=12) or (a=1) or (a=2) then write('zima')

                  else  if (a=3) or (a=4) or (a=5) then write ('vesna')

                            else  if (a=6) or (a=7) or (a=8) then write ('leto')

                                      else write('oseni');

    repeat until keypressed;

end.