LINUX.ORG.RU

История изменений

Исправление Napilnik, (текущая версия) :

Что-то не очень на 5.11 похоже.

Вопрос был про пятнадцать знаков, ты их получил. Если тебе нужны ещё и 3, то получи и их. И чтобы ещё раз не писать, тест про сложение во Writeln по умолчанию, без явного задания типа переменной. По количеству знаков можно догадаться что используется что-то помощнее Double

var
Q1,W1: DOUBLE;

begin
WRITELN('QQQQQQQQQQQQQQQQQQQQQQ');
Q1:=1.2345678901234567890;
WRITELN(Q1);
Q1:=Q1+3;
WRITELN(Q1);
Q1:=Q1+200;
WRITELN(Q1);
WRITELN('WWWWWWWWWWWWWWWWWWWWWWWWWWW');
W1:=5.11;
WRITELN(W1);
W1:=3.11;
WRITELN(W1);
W1:=W1+2;
WRITELN(W1);
WRITELN('|||||||||||||||||||||||||');
WRITELN(3.11+2);
end.

И традиционный результат в виде скриншота консоли:)

http://i90.fastpic.ru/big/2017/0315/35/f8023efa2afbc21e43e636778bde4035.png

Исходная версия Napilnik, :

var Q1,W1: DOUBLE;

Что-то не очень на 5.11 похоже.

Вопрос был про пятнадцать знаков, ты их получил. Если тебе нужны ещё и 3, то получи и их. И чтобы ещё раз не писать, тест про сложение во Writeln по умолчанию, без явного задания типа переменной. По количеству знаков можно догадаться что используется что-то помощнее Double

begin
WRITELN('QQQQQQQQQQQQQQQQQQQQQQ');
Q1:=1.2345678901234567890;
WRITELN(Q1);
Q1:=Q1+3;
WRITELN(Q1);
Q1:=Q1+200;
WRITELN(Q1);
WRITELN('WWWWWWWWWWWWWWWWWWWWWWWWWWW');
W1:=5.11;
WRITELN(W1);
W1:=3.11;
WRITELN(W1);
W1:=W1+2;
WRITELN(W1);
WRITELN('|||||||||||||||||||||||||');
WRITELN(3.11+2);
end.

И традиционный результат в виде скриншота консоли:)

http://i90.fastpic.ru/big/2017/0315/35/f8023efa2afbc21e43e636778bde4035.png