Показать сообщение отдельно
Mase1
XXZP.
Аватар для Mase1
Сообщения: 16,816
Регистрация: 08.08.2007
Откуда: Genève
Старый пост, нажмите что бы добавить к себе блог 21 января 2011, 00:56
Домашняя страница ВКонтакте Live Journal MySpace Отправить сообщение через twitter для Mase1
  #810 (ПС)
-Цитата от alligator[7Вагон] Посмотреть сообщение
ктото подскажет
вот есть паскаль 7.1 работает нормально на висте но с одним НО когда я делаю наприме простой калькулятор
var
s: Char;
x,y,z: real;
begin
Write(' x=');
readln(x);
Write(' Znak=');
readln(s);
Write(' y=');
readln(y);
if s='+' then z:=x+y;
if s='-' then z:=x-y;
if s='*' then z:=x*y;
if s='/' then z:=x/y;
write(x,s,y,'=',z);
end.

вот
кнтрл+ф9,ввожу х,ввожу знак,ввожу у, и БАБАХ выбивает в код программы. и только если не писать clrscr то только после снова кнтрл+ф9 можно увидеть вывод write(x,s,y,'=',z);



п.с. в любой проге выбивает.обсолютно.доходит до определнного момента и выбивает обратно в код.не завершая операцию)
оно завершает всё, ты просто вконце ожидание какого то действия поставь, например readln

offline
Ответить с цитированием