Преобразовать алгоритм, записанный на алгоритмическом языке в программу на языке pascal.
алгоритмический язык:
алг выражение
нач цел х
вещ у
ввод х
если х> =0
то у: =sqrt (x)
иначе у: =аbc (х)
все
вывод у
кон

perrezz perrezz    3   27.03.2020 01:31    29

Ответы
Bomb9931 Bomb9931  12.10.2020 06:35

аbc (х) судя по всему - это abs(x) - модуль числа x.

begin

var x: integer;

var y: real;

readln(x);

if (x>=0) then y:=sqrt(x)

else y:=abs(x);

writeln(y);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика