Ввести с клави атуры знак арифметической операции(либо+,либо-,либо/)и два числа

@Кросби · Регистрация: 16.05.2011

Author24 — интернет-сервис помощи студентам

Ввести с клавиатуры знак арифметической операции(либо+,либо-,либо/)и два числа.Вывести на экран результат.При вводе знака операции #-выход из программы

@Puporev · 18.05.2011, 11:13

Pascal

uses crt;
var c:char;
    a,b:real;
begin
clrscr;
writeln('Введите 2 числа:');
readln(a,b);
repeat
clrscr;
writeln('Выберите действие');
writeln('+ сложение');
writeln('- вычитание');
writeln('* умножение');
writeln('/ деление');
writeln('# выход');
repeat
readln(c);
until c in ['+','-','*','/','#'];
case c of
'+':begin
    writeln(a+b:0:2);
    readln
    end;
'-':begin
    writeln(a-b:0:2);
    readln
    end;
'*':begin
    writeln(a*b:0:2);
    readln
    end;
'/':begin
    if b=0 then writeln('Деление на 0')
    else writeln(a/b:0:2);
    readln
    end;
'#':exit;
end;
until c='#';
end.

@Кросби · 18.05.2011, 12:57 **[ТС]**

спасибо

@Кросби 0 / 0 / 0 Регистрация: 16.05.2011 Сообщений: 9
		1
	Ввести с клави атуры знак арифметической операции(либо+,либо-,либо/)и два числа 17.05.2011, 15:50. Показов 2561. Ответов 2 Метки нет (Все метки) Ввести с клавиатуры знак арифметической операции(либо+,либо-,либо/)и два числа.Вывести на экран результат.При вводе знака операции #-выход из программы 0

@Кросби 0 / 0 / 0 Регистрация: 16.05.2011 Сообщений: 9
	18.05.2011, 12:57 [ТС]	3
	спасибо 0

Ввести с клави атуры знак арифметической операции(либо+,либо-,либо/)и два числа

Решение