Написать программу для паскаля. сумма цифр двузначного числа a

Program summa; var a,b : integer; begin   write('введите двухзначное число');   readln(a);   b: = a div 10;   a: = a mod 10;   writeln('сумма цифр этого числа равна: ',b+a); end.

#include < iostream> using namespace std; int main() {     int n, m;     cout < < "n = ", cin > > n, cout < < "\n";     cout < < "m = ", cin > > m, cout < < "\n";     if (n > m) cout < < "наибольшее число = " < < n < < "\n";     else if (m > n) cout < < "наибольшее число = " < < m < < "\n";     else cout < < "числа равны\n";     return 0; } пример: n = 15m = 27наибольшее число = 27

Program z1;   var     a, b: integer;   begin     a: =0;     readln(b);     a: =a+b;     readln(b);     a: =a+b;     readln(b);     a: =a+b;     readln(b);     a: =a+b;     write(a);   end.или    program z1;   var    a, b: integer;   procedure add;     begin      readln(b);       a: =a+b;     end;         begin    a: =0;     add();     add();     add();     add();     writeln(a);   end.