Question

Se dau 2 numere naturale. Calculați suma, diferenţa, produsul şi câtul lor, în această ordine. (Pascal)

Answer 1

Program P5;
var a,b,s,p,d,c: real;
begin
writeln('Introduceti un numar natural:');
readln(a);
writeln('Introduceti alt numar ntural:');
readln(b);
s:=a+b;
c:=a-b;
p:=a*b;
d:=a/b;
writeln('Suma numerelor naturale:');
writeln(s);
writeln('Catul numerelor naturale:');
writeln(c);
writeln('Produsul numerelor naturale:');
writeln(p);
writeln('Diferenta numerelor naturale:');
writeln(d);
end.