Предмет: Информатика, автор: prinzeccka38

Напишите программу на языке Паскаля. Используя then и else

Приложения:

fsdfsd1974: Могу сделать х в квадрате и корень х, но не пойму как н вывести, с системой что нужно сделать?
fsdfsd1974: y*

Ответы

Автор ответа: Arkassssha
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.

Похожие вопросы