Есть ответ 👍

4. составить программу проверяющую, лежит ли точка с указанными координатами x, y на окружности радиуса r с центром в начале координат

130
417
Посмотреть ответы 2

Ответы на вопрос:


/////////////////////////////////////
baltan1978
4,5(34 оценок)

Var a : integer;     s : set of byte; begin   s: =[];   readln(a);   repeat     if (a mod 10) in s then write(a mod 10: 2) else include(s,a mod 10);     a: =a div 10;   until a=0;     writeln; end.

Популярно: Информатика