Регистрация Спросить otvet5GPT
nataliacosciuc
22.11.2021 22:59
Информатика
Есть ответ 👍

Перекодируйте программу с for на repeat var x,y,r1, r2: integer; koltoch: byte; begin writeln('введите внутренний радиус r1'); readln(r1); writeln('введите внешний радиус r2'); readln(r2); koltoch: = 0; for x: = -r2 to r2 do for y: = -r2 to r2 do if (sqrt(sqr(x) + sqr(y)) > r1) and (sqrt(sqr(x) + sqr(y)) < r2) then begin koltoch: = koltoch + 1; writeln (x,' ',y); end; writeln(koltoch); readln end

113
367
Посмотреть ответы 2

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

alsumamadaliev
alsumamadaliev
4,6(13 оценок)
Var  x,y,r1, r2: integer; koltoch: byte; begin   writeln('введите внутренний радиус r1');   readln(r1);   writeln('введите внешний радиус r2');   readln(r2);   koltoch: = 0;   x : = -r2;   repeat     y : = -r2;     repeat       if (sqrt(sqr(x) + sqr(y)) > r1)       and (sqrt(sqr(x) + sqr(y)) < r2) then       begin         koltoch: = koltoch + 1;         writeln (x,' ',y);       end;       y : = y + 1;     until y = r2;     x : = x + 1;   until x = r2;   writeln(koltoch);   readln end.
linabananchik
linabananchik
4,5(91 оценок)
19 0 2 4 5 3 4 0 4 0 4 5 9 4 6 8 5 7 8 0 8 3 5 9 3 0

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

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

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!

  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS