Рассчитать число зерен, выращенных работником за N лет, если он посадил 10 зерен, а годовой урожай составляет 22 зерна на каждое посаженное зерно. — Pascal(Паскаль)

uses crt;

var
  n, i, c: integer;

begin
  clrscr;
  writeln('vvedite kol-vo let');
  readln(n);
  c := n * 10 * 22;
  writeln('chislo zeren, virashennih rabotnikom za ', n, ' let = ', c);
  readln;

end.