Программа вкратце. Если посещал уроки то сможешь ее написать чтоб работала. В условии задачи ошибка, наверное вместо - написал плюс. y = sqrt(х+5). если x>0. пусть здесь будет так: у= sqrt(5-х). если x<0
Program radical; var x,y:integer; Begin readln(x); if ((x+5) >= 0) and ((5-х) >=0)) then begin { проверка чтобы не-было меньше нуля } if (x>0) then y = sqrt(x+5); else if (x<0) then y = sqrt(5-x); writeln('результат=', y);
end else writeln("нельзя извлечь корень из отрицательного числа");
readln();
End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
