Программистам по Паскалю: прошу написать код программы

Question

Калькулятор для чисел А и Б - пользователь выбирает, что с ними делать - слагать, умножать, делить (делить на 0 нельзя)

Василий · Accepted Answer

program pr1; 
uses crt; 
var 
 a, b, : integer; 
 c : real; 
begin 
clrscr; 
write ('a= '); read (a); 
write ('b= '); read (b); 
if a or b = 0 then 
 writeln ('Решений нет') 
else 
 begin 
 c := (a/b); 
 writeln ( c ); 
end. 
 
Точно не помню. . это может не правильно. 
Это задача на деление.. .

Альберт · Answer

Слагать говорите. Прошу заплатить мне денег, а я вам и напишу программу по слоганию.