Показать сообщение отдельно

  #14  
Старый 20.06.2007, 15:54
Exile1985
Участник форума
Регистрация: 10.08.2006
Сообщений: 147
С нами: 10395573

Репутация: 94
По умолчанию

Цитата:
Сообщение от NetMan  
Я же дал новый рабочий код!
Код:
uses crt;
var
    a,b,c:real;
    action:char;
begin
      write('a='); readln(a);
      write('b='); readln(b);
      write('action='); readln(action);
      case action of
        '+':c:=a+b;
        '-':c:=a-b;
        '/':c:=a/b;
        '*':c:=a*b;
      end;
      writeln(a:1:3,action,b:1:3,'=',c:1:3);
      readln;
end.


да нет чел, в твоем коде получается так:
a= //вводим первое число
b= //вводим второе число
жмем Enter и получаем
c:= //ответ

а нужно так

a:= 4+4 //т.е. вводим не по одному числу, а сразу все вместе с знаком +,-,/,*, все одной строкой, чтоб получилосьтак
a:= 25+26
жмем Enter получаем
c:=51
 
Ответить с цитированием