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