Запишите в каждый столбец данной таблицы все понятия, устройства, команды программы, изученные вами, и начинающиеся с предложенной буквы в названии столбца.
​

read(n);

s = str(n);

n1 : = int(s[1]);

n2 : = int(s[2]);

n3 : = int(s[3]);

if (n1+n2+n3) mod 2 = 0 then writeln("сумма чисел четная")

var

  i,s: longint;

begin

  for i: =20 to 60 do if i mod 5=0 then inc(s,i);

writeln(s);

end.

а) pas вот это правильный ответ!