Delphi:Оператор выбора Case

Компьютеры программирование делфи Информатика Языки программирования

Помогите пожалуйста решить задачу:
Арифметические действия над числами пронумерованы следующим образом: 1 — сложение, 2 — вычитание, 3 — умножение, 4 — деление. Дан номер действия и два числа A и B (В не равно нулю). Выполнить над числами указанное действие и вывести результат.

Примечание:
Пытался сделать вот таким вот образом, но выскакивает ошибка [Error] Unit1.pas(48): There is no overloaded version of 'IntToStr' that can be called with these arguments
procedure TForm1.btn1Click(Sender: TObject);
var n:integer; a,b,rez:real;
begin
n:=strtoint(edt1.Text);
a:=strtoint(edt2.Text);
b:=strtoint(edt3.Text);
case n of
1:rez:=a+b;
2:rez:=a-b;
3:rez:=a*b;
4:rez:=a/b;
else
ShowMessage('Ошибка');
end;
edt1.Text:=IntToStr(rez);
end;
end.

Примечание:
Какой тип тогда ставить?
Ответы:
-_- Просто....
Case Action of
1: Result := A + B;
2: Result := A - B;
3: Result := A * B;
4: Result := A / B;
end;
IntToStr(rez) не может принимать параметр типа real,
а rez у тебя как раз real.
edt1.Text:=FloatToStr(rez);


12 лет назад

RPI.su - самая большая русскоязычная база вопросов и ответов. Наш проект был реализован как продолжение популярного сервиса otvety.google.ru, который был закрыт и удален 30 апреля 2015 года. Мы решили воскресить полезный сервис Ответы Гугл, чтобы любой человек смог публично узнать ответ на свой вопрос у интернет сообщества.

Все вопросы, добавленные на сайт ответов Google, мы скопировали и сохранили здесь. Имена старых пользователей также отображены в том виде, в котором они существовали ранее. Только нужно заново пройти регистрацию, чтобы иметь возможность задавать вопросы, или отвечать другим.

Чтобы связаться с нами по любому вопросу О САЙТЕ (реклама, сотрудничество, отзыв о сервисе), пишите на почту [email protected]. Только все общие вопросы размещайте на сайте, на них ответ по почте не предоставляется.