Ребят , проблема с циклами. Обойдусь без предысторий с "хорошим учителем"... Нужно написать циклы while и repeat/until. Обязательно с оператором if, ибо учитель просит, так как он необходим.
Область "определения" от x=-10 и x=10
Выражение такое: y = корень из (5-x)
Проблема заключается в том, что цикл я составил и он работал, но в качестве значения y под некоторыми значениями x выводилось некое NaN. (Собственно из-за этого if и просится)
Как убрать в принципе знаю, но понятия не имею как оформить.
Кому не лень ...
p.s. Напишите цикл полностью, от корки до корки ...
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;
Объяснение:
Вот и весь цикл