Написать программу на паскалеЕсли данное число х меньше нуля, то Z присвоить…

Question

92

Написать программу на паскалеЕсли данное число х меньше нуля, то Z присвоить значение большего из 2 чисел х и у, иначе Z присвойте значение полсуммы этих чисел.

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

microcosmos · Accepted Answer

45

microcosmos

12 апреля 2023

Program Z; Uses Crt; var x,y,z: real; begin clrscr; write ('Введите х: '); readln (x); write ('Введите y: '); readln (y); if (x<0) and (x>y) then z: =x; if (x<0) and (x=0) then z: =(x+y) /2; writeln ('z=',z); readkey; end.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: