Составить по алгоритму программу на языке программирования Pascal.
Составить по алгоритму программу на языке программирования Pascal.
Ответ(ы) на вопрос:
Var x,z:real;
begin
write('x = ');
readln(x);
if x<0 then z:=ln(-x)/ln(10) else z:=sqrt(x+1);
writeln('z = ',z);
end.
Пример:
x = -100
z = 2
Не нашли ответ?
Похожие вопросы