Delphi 7. Оператор выбора

[Юрий2009]

Даны два действительных положительных числа x и y. Арифм. д-я над числами пронумированы (1-сложение,2-вычитание,3-умножение,4-деление). Составить программу, которая по введенному номеру выполняет то или иное действие над числами. Решите please задачу! Заранее большое СПАСИБО!!!!!

[Sazary]

Тут посмотрите
http://programmersforum.ru/showthread.php?t=43334

[Chudo4258]

var x,y,n: integer;
begin
write('x= ');readln(x);
write('y= ');readln(y);
write('Введите номер операции: ');readln(n);
 case n of
1: writeln (x,' + ',y,' = ',x+y);
2: writeln (x,' - ',y,' = ',x-y);
3: writeln (x,' * ',y,' = ',x*y);
4: writeln (x,' / ',y,' = ',x/y);
readln;
end.

[Юрий2009]

Сообщение от Chudo4258

var x,y,n: integer;
begin
write('x= ');readln(x);
write('y= ');readln(y);
write('Введите номер операции: ');readln(n);
 case n of
1: writeln (x,' + ',y,' = ',x+y);
2: writeln (x,' - ',y,' = ',x-y);
3: writeln (x,' * ',y,' = ',x*y);
4: writeln (x,' / ',y,' = ',x/y);
readln;
end.

Не работает! Составьте программу полностью, может я что то пропустил!

[DM_bite]

Не работает! Составьте программу полностью, может я что то пропустил!

О_о вы меня ,конечно, извините, но это задача для пятого класса средней школы.Вы что не можете подставить в программу код?
Перед этим кодом поставьте:

program имя-программы;

[Arigato]

program имя-программы;

Это не обязательно.
Я заметил, что у уважаемого Юрий2009 вообще ничего не работает ( http://programmersforum.ru/showthread.php?t=47711 ).
Скорее всего проблема в том, что товарищ не знает, как создать консольное приложение в Делфи.

[Дикий]

Скорее всего проблемма в том, что человек просто ленится что то сдела ть и что то прочитать...

ему надо

Составьте программу полностью

Солидарен с Arigato
--**
--**
--**
--**
*****
-***
--*

[Arigato]

Скорее всего проблемма в том, что человек просто ленится что то сдела ть и что то прочитать...

Такому даже не хочется помогать.