арифметика в сценарии

Обсуждение программы Айрен и общих вопросов тестирования
Ответить
semsmith
Сообщения: 28
Зарегистрирован: 05 июн 2013, 12:55

арифметика в сценарии

Сообщение semsmith »

var
t1, t2: Integer;
s: Real;
begin
t1 := Random(8) + 2; { 2...9 }
repeat
t2 := Random(8) + 3; { 2...10 }
until (t1 < t2) ;

s:= 10*(t2-t1)-(5/4)*(t2*t2-t1*t1)

К сожалению в сценарии эта конструкция, почему-то выдает неверный ответ????
Замена t2*t2 на sqr(t2) приводит к error.

Заранее спасибо за ответ
sergey_o
Администратор
Сообщения: 703
Зарегистрирован: 21 дек 2008, 20:06
Контактная информация:

Re: арифметика в сценарии

Сообщение sergey_o »

Выражение (5 / 4) здесь рассматривается как целочисленная операция и дает в результате 1. Чтобы показать, что речь идет о действительных числах, нужно хотя бы одно из них явно записать в таком виде: (5.0 / 4).
Ответить