Напишите программу в pascal abc
Для первых n двузначных натуральных чисел вывести суммы цифр каждого числа

program z1;var s,n,x,i:integer;beginx:=10;writeln('введите n');readln(n);for i:=1 to n dobegins:=x div 10+x mod 10;write(s,' ');x:=x+1;end;end.