20 января 2011, 23:12
| | |
#807 (ПС)
| ктото подскажет
вот есть паскаль 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);
п.с. в любой проге выбивает.обсолютно.доходит до определнного момента и выбивает обратно в код.не завершая операцию) |