Выводи нето(

[Xcopy]

В чем причина, что выводит не то, что в input'e?

program exe;
uses crt;
var
f: text;
a,b: integer;
begin clrscr;
assign(f,'C:\input.txt');
reset(f);
read(f,a);
read(f,b);
writeln(a,' ',b);
close(f);
readkey; end.

[puporev]

А что в input?

[Xcopy]

В инпуте:
45456456 545646
Выводит:
-25528 21358

[Doholyan]

в этом коде....я так вижу...что будет показывать...два числа....и одну строку..с пробелами между числами....

Что и как записанно у тебя в файле?

[Doholyan]

ну...правильно....посмотри integer.... его параметры...он выводит от -32768 до 32767...
число не "влазит"....в выделенную память....

[puporev]

Напиши
a,b: longint;
У тебя вылазят числа за предел integer

[TAVulator]

замени

a,b: integer;

на

a,b: string;

и выведет то, что надо.

[Xcopy]

Спасибо, а какой придел у longin?

[Xcopy]

TAVulator, не, мну именно в численной переменной надо)

[TAVulator]

Спасибо, а какой придел у longin?

Longint -2147483648..2147483647