Предмет: Информатика,
автор: sofaiou
преобразовать алгоритм, записанный на алгоритмическом языке в программу на языке pascal.
алгоритмический язык:
алг выражение
нач цел х
вещ у
ввод х
если х> =0
то у: =sqrt (x)
иначе у: =аbc (х)
все
вывод у
кон
Ответы
Автор ответа:
15
Ответ:
а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.
Похожие вопросы
Предмет: Русский язык,
автор: Шишканя
Предмет: Английский язык,
автор: nika11039695
Предмет: Английский язык,
автор: romarke161
Предмет: Математика,
автор: xXskorpionXx
Предмет: Химия,
автор: MisterBuble