Составьте программу, которая формирует массив, содержащий 10 случайных целых чисел, принадлежавших промежутку [0; 7], и преобразует элементы массива по следующему правилу: к чётному числу прибавляет 3,а к нечётное умножает на 4

137

461

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

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

Равб

Информатика

4,6(91 оценок)

program program1; vari: integer; a: array [1..10] of integer; beginrandomize; writeln; writeln('массив до преобразования: '); for i: =1 to 10 dobegina[i]: =random(8); write(a[i],', '); end; for i: =1 to 10 doif a[i] mod 2 = 0 thena[i]: =a[i]+3elsea[i]: =a[i]*4; writeln; writeln('массив после преобразования: '); for i: =1 to 10 dowrite(a[i],', '); end.

Сергей0013

Информатика

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

1) var k: integer; begin for k: =1 to 5 do write(i*2: 4); readln end. 2) begin writeln((10+15)*(15-10+1)/2); readln end. или begin writeln(75); readln end. 3) var a,n: integer; begin readln(n,a); if n mod a = 0 then writeln('делится нацело') else writeln('не делится нацело'); readln end. 4) var n: integer; begin readln(n); writeln(trunc((sqrt(4*(n+1)+1)-1)/2+0.9999)); readln end;

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

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

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

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

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

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

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

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

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

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