Напишите, , ипрограмму по этой блок-схеме

vladbb2017 vladbb2017    3   17.05.2019 18:40    0

Ответы
Ganifa505 Ganifa505  11.06.2020 01:22

Пишу в Pascal

Объяснение:

var

x,f:real;

begin

read(s);

if x>0 then

f:=x

else

f:=-x;

write(f);

end.

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