Напиши за база данных MS Access): записи, в которых названия стран заканчиваются на "ак".

За

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.

2*3=6

512*128*6=393216

393216: 1024=384кб

var

a,b: integer;

begin

write('введите в одной строке два целых числа и нажмите < enter> ');

readln(a,b);

if a=b then writeln('числа равны')

else 

if a> b then writeln(a,' больше')

else writeln(b,' больше')

end.

аборигеном