PetuhovРебят, посчитайте , проблема с циклами. Обойдусь без предысторий с "хорошим учителем". . . Нужно написать циклы while и repeat/until. Обязательно с оператором if, ибо учитель просит, так как он необходим. Область "определения" от x=-10 и x=10Выражение такое: y = корень из (5-x)Проблема заключается в том, что цикл я составил и он работал, но в качестве значения y под некоторыми значениями x выводилось некое NaN. (Собственно из-за этого if и просится)Как убрать в принципе знаю, но понятия не имею как оформить. Кому не лень, просьба помочь. . . p. s. Напишите цикл полностью, от корки до корки, прошу. . .
ответы: 1
Зарегистрируйтесь, чтобы добавить ответ
Ответ:
x := -10
while x <= 10 do begin
{Обязательно надо сделать проверку на знак}
{Потому что корень из отрицательных чисел не вычисляется}
{Результатом будет NaN - неопределённое значение}
if 5-x >= 0 then
y := sqrt(5-x);
x := x + 1
end;
{==============================================}
x := -10;
repeat
if 5 - x > 0 then y := sqrt( 5 - x);
x := x + 1;
until x >= 10;
Вот и весь цикл
378
DriesЧтобы ответить необходимо зарегистрироваться.
