Ответы
Гость
Var
x,y:real;
Begin
Write('x = ');ReadLn(x);
Write('y = ');ReadLn(y);
Write((x>=0)or(y*y>4))
End.
x = 2
y = 2
True
Нет комментариев
Похожие вопросы
Информатика
Помогите,пожалуйста,с Pascal...
Информатика
Помогите,пожалуйста,с Pascal...
Информатика
Помогите нужно срочно решить 3-4...
Информатика
8 помогите плииииииииз...