Есть ответ 👍

Переписать, исправив ошибки в программе: program primer; var x,y : integer; begin x=0; while x > = 3.1 do begin y: = sin(x); writeln(x,y); x: =x+0.1; end; end.

192
377
Посмотреть ответы 2

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


program primer;

var x, y : real;

begin

x: =0;

while x > = 3.1 do  

begin

y : = sin(x);

writeln(x,y);

x: =x+0.1;

end;

end.


program n_1;

var a: array [1..1000] of integer; i, buf: integer;

begin

  for i: =1 to 1000 do read(a[i]); //вводим массив

    for i: =1 to 500 do begin //переворачиваем массив

        buf: =a[i];

   
    a[i]: =a[1001-i];

        a[1001-i]: =buf;

    end;

    for i: =1 to 1000 do write(a[i], ' '); //выводим перевернутый массив

    writeln(); //переносим строку

    for i: =1 to
1000 do begin //выводим нужные нам числа

        buf: =a[i];

        while buf> 9 do buf: =buf div 10; //buf равно старшему разряду

        if buf> a[i] mod 10 then write(a[i], ' '); //если старший
разряд больше младшего, то выводим

    end;

end.

часть, выделенная полужирным, эквивалентна

for i: =1000 downto 1 do read(a[i]); //заполняем массив с конца и тем самым он сразу становится перевернутым.

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

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

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

Caktus Image

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

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

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

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

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

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

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

GTP TOP NEWS