Program adsad; uses crt; var y:real; x:real; p:string; begin textcolor(Lightgreen); writeln('Введите значение x: '); readln(x); writeln('Введите y под корнем: '); readln(y); y:= sqrt(x); writeln('ответ ', y); if x<=0 then if y<=0 then y:=0; //Обнулил счетчик y:=x*x; writeln('ответ ', y); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
