Напиши назначение клавиш на клавиатуре 3 класс

Устройства, подключаемые к компьютеру, можно разделить на устройства ввода и вывода. клавиатура предназначена для ввода данных в компьютер.клавиши сигнал, и выполняется какое-либо назначенное на эту клавишу действие

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.

 

                                                                                                 

var a: integer;

begin

  read(a);

  if a mod 3 = 0 then writeln('делится')

  else writeln('не делится');

  readln;

end.