Pascal:
var a,b:real;
begin
write ('A = ');
readln (a);
write ('B = ');
readln (b);
writeln ('Summa: ',a+b);
writeln ('Raznost: ',a-b);
writeln ('Proizvedenie: ',a*b);
if b=0 then writeln ('Division by zero!') else writeln ('Chastnoe: ',a/b);
readln;
end.
C++:
#include
using namespace std;
int main()
{
float a,b;
cout <<"A = ";<br> cin >>a;
cout <<"B = ";<br> cin >>b;
cout <<"Summa: " <<a+b <<endl<br> <<"Raznost: " <<a-b <<endl<br> <<"Proizvedenie: " <<a*b <<endl;<br> if (b==0)
cout <<"Division by zero!";<br> else cout <<"Chastnoe: " <<a/b <<endl;<br>}