ulyana-d
?>

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

Информатика

Ответы

funny-furiya

Код программы:

var y, x:real;

begin

 writeln('Введите x');

 readln(x);

 if x < 0 then

   x := x * x

 else

   x := sqrt(x);

 writeln('x = ', x);

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Напишите программу на языке Паскаля. Используя then и else
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

artemkolchanov24
krasnobaevdj3
mgg64
Vitalevich1799
Bolshakova Shigorina
turaev-1098
Magnolia200872
sanyaborisov910067
Терентьева
kapral1812
daryagulyaeva
andreanikin
Lolira64
Solovetzmila
Платон Демцун