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

  #22  
Старый 20.06.2007, 16:54
Fire3d
Познающий
Регистрация: 14.04.2007
Сообщений: 46
Провел на форуме:
842554

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

Вот мой способ
Цитата:
uses crt;
var
a,b,s,c:integer;
begin
write('>'); readln(a,c,b);
write(a);
case c of
'+':write('+');
end;
write(b);
s:=a+b;
writeln('=',s);
end.
Почему он не работает ?
 
Ответить с цитированием