Предмет: Информатика,
автор: prinzeccka38
Напишите программу на языке Паскаля. Используя then и else
Приложения:
![](https://files.topotvet.com/i/01c/01ccf1bbf541de92e5bba7b4e2a67a8f.jpg)
fsdfsd1974:
Могу сделать х в квадрате и корень х, но не пойму как н вывести, с системой что нужно сделать?
Ответы
Автор ответа:
1
Код программы:
var y, x:real;
begin
writeln('Введите x');
readln(x);
if x < 0 then
x := x * x
else
x := sqrt(x);
writeln('x = ', x);
end.
Похожие вопросы
Предмет: Русский язык,
автор: silantyevm
Предмет: Математика,
автор: mvideorusamsung
Предмет: Математика,
автор: nikolay27101990
Предмет: Алгебра,
автор: masatodorova00