ДЗ на 3 февраля

Выучить

//фам 
var a,p,v,s:integer;
begin
write('введите 2 зн число');
readln(a);
p:=a div 10;
writeln(p,'= 1 цифра');
v:=a mod 10;
 writeln(v,'= 2 цифра');
s:=p+v;
writeln('= ' , s);
end.