калькулятор для Pascal (Паскаль)

var snd1,snd2,a,b,d:integer;
    c:real;
begin
writeln('Введите первое число');
read(a);
write('Введите знак-1(плюс)2(минус)3(умножить)4(делить)');
read(d);
write('Введите второе число');
read(b);
if d=1 then c:=a+b;
if d=2 then c:=a-b;
if d=3 then c:=a*b;
if d=4 then c:=a/b;
write('Ответ:  ',c);
end.
Теги:
паскаль, калькулятор pascal, pascal
Добавлено: 22 Июня 2014 10:54:56 Добавил: Андрей Ковальчук Нравится 0
Добавить
Комментарии:
Нету комментариев для вывода...