Предмет: Информатика,
автор: Получил0Двойку
Небольшая программка на паскале)
Буду очень благодарен
Под буквой " А"
Приложения:
Ответы
Автор ответа:
1
// PascalABC.NET 3.4.2, сборка 1797 от 22.09.2018
begin
var (x,y):=ReadInteger2('x,y=');
Println(-x+y<=0?x*x+y*y <= ReadInteger('R=')**2?'Да':'Нет':'Нет');
end.
Похожие вопросы
Предмет: Русский язык,
автор: ttik92716
Предмет: Математика,
автор: Аноним
Предмет: Алгебра,
автор: corovkinasvetik
Предмет: Математика,
автор: jroslov
Предмет: Обществознание,
автор: izyasinyaya