(желательно с пояснением) 1. запишите на языке паскаль массив с, в котором 7 элементов, заданных оператором присваивания. вывод в столбик. 2. создать одномерный массив c из 12 целых элементов. числа вводит пользователь с клавиатуры. вывести на экран массив в виде строки чисел. 3. напишите программу, реализующую заполнение случайными числами 15 элементов массива s и вывод их на экран. элементы массива – это целые числа из промежутка [0; 40]. 4. напишите программу, реализующую заполнение 25 числами массива b по формуле и вывод их на экран в строку по формату: целая часть – 9 позиций, дробная – 3 позиции. формула: элемент массива равен сумме двух предыдущих элементов, деленной на номер текущего элемента, т.е. третий элемент равен (первому + второму)/3(индекс третьего) и т.д. значения первого и второго элемента: b[1]: =3; b[2]: =6;

266

440

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

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

софа336

Информатика

4,4(44 оценок)

1. var a: array[1..7] of integer; i: integer; begin //заполнение массива a[1]: =3; a[2]: =8; a[3]: =2; a[4]: =0; a[5]: =2; a[6]: =1; a[7]: =7; //вывод массива for i: =1 to 7 do writeln(a[i]); end. 2. var c: array[1..12] of integer; i: integer; begin //заполнение массива for i: =1 to 12 do begin writeln('введите ',i,' элемент массива'); readln(c[i]); end; //вывод массива writeln('массив'); for i: =1 to 12 do write(c[i],' '); end. 3.var s: array[1..15] of integer; i: integer; begin //заполнение массива for i: =1 to 15 do s[i]: =random(40); //вывод массива writeln('массив'); for i: =1 to 15 do write(s[i],' '); end. 4.var b: array[1..25] of real; i: integer; begin //заполнение массива b[1]: =3; b[2]: =6; for i: =3 to 25 do b[i]: =(b[i-1]+b[i-2])/i; //вывод массива writeln('массив'); for i: =1 to 25 do write(b[i]: 9: 3); end.

dimasgym

Информатика

4,8(93 оценок)

//pascalabc.net //версия 3.3, сборка 1634 begin var x: =readreal; if x=0 then write('нет решений') else write(1/x); end.

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

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

Задай свой вопрос

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

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

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

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

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

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

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