Маленькая программа на паскале)Буду очень благодаренПод буковкой " А"

Маленькая программа на паскале)
Буду очень признателен
Под буковкой " А"

Задать свой вопрос
1 ответ

// PascalABC.NET 3.4.2, сборка 1797 от 22.09.2018


begin

 var (x,y):=ReadInteger2('x,y=');

 Println(-x+ylt;=0?x*x+y*y lt;= ReadInteger('R=')**2?'Да':'Нет':'Нет');

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт