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

Ответить


Этот вопрос предназначен для предотвращения автоматической отправки форм спам-ботами.

BBCode ВКЛЮЧЁН
[img] ОТКЛЮЧЕН
[url] ВКЛЮЧЁН
Смайлики ОТКЛЮЧЕНЫ

Обзор темы
   

Развернуть Обзор темы: дефект в сценарии

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

sergey_o » 31 июл 2019, 23:48

Это вновь из-за целочисленного деления, измените тип переменных на Real. В новой версии программы такого нестандартного поведения операции деления нет, в ней сценарий будет работать ожидаемым образом и в исходном виде.

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

semsmith » 31 июл 2019, 21:06

Уважаемые коллеги.
Помогите понять: почему сценарий
var
x2, h1, x1 : integer ;
otv : real ;

begin

h1 := random(60) + 20 ;
x1 := random(6) + 3 ;
repeat
x2 := random(6) + 3
until
x2 <> x1 ;

otv := h1*((x2/x1)*(x2/x1)-1) ;

end.
при некоторых значениях х1 и х2 дает otv= 0
Спасибо.

Вернуться к началу