Предмет: Информатика,
автор: Dino1337
Разработайте алгоритм вычисления функции z
Приложения:

Ответы
Автор ответа:
0
program q1; var x,y,z,q: real; begin readln(x); readln(y); q:=y*y+x*x; if(q<1) then do z:=q; if(q>1) then do z:=0.5; if(q=1) then do z:=x+y; writeln(z); end.
Похожие вопросы
Предмет: Математика,
автор: angelina201130
Предмет: Биология,
автор: newmechta2818
Предмет: Қазақ тiлi,
автор: Аноним
Предмет: Биология,
автор: vova987
Предмет: Алгебра,
автор: amirratmir