1. написать программу в паскале, в результате выполнения которой на экране будут выведены 5 строк: меня зовут (фамилия, имя) я учусь в 7 «__» классе гимназии 524 мое хобби периметр прямоугольника равен 30 сегодня ярко светит солнце! 2. в трёх опросах ученик получил оценки. составьте алгоритм и программу, которая определит среднее значение оценок, полученных учеником в трёх опросах. оценки ввести с клавиатуры. результат вывести на экран. 3. написать программу нахождения периметра прямоугольника по известным сторонам a и b (a и b – целые числа, вводимые с клавиатуры)

229

233

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

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

Qudipue1

Информатика

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

1. программа "анкета": program anketa; var a,b,d: string; c: char; begin writeln('введите ваши имя и фамилию в именительном падеже: '); readln(a,b); writeln('введите букву класса: '); readln(c); writeln('введите ваше хобби: '); readln(d); writeln('меня зовут ',a,' ',b,'; '); writeln('я учусь в 7 "',c,'" классе гимназии 524; '); writeln('моё хобби - ',d,'; '); writeln('периметр прямоугольника равен 30'); writeln(' сегодня ярко светит солнце! ') end. 2. программа "опросы": program oprosy; var a,b,c: integer; d: real; begin writeln('введите ваши оценки по шкале: '); readln(a,b,c); d: =(a+b+c)/3; writeln('ваша средняя оценка за тесты - ',d,'.'); end. 3. программа "периметр прямоугольника": program perimetr; var a,b,c: integer; begin writeln('введите стороны прямоугольника: '); readln(a,b); c: =(a+b)*2; writeln('периметр прямоугольника = ',c,'.'); end.

zukhra1234

Информатика

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

Const k = 20; var a: array[1..k] of integer; c, i, n: integer; begin randomize; write('введите число элементов массива (не более 20): '); readln(n); write('введите целое число с: '); readln(c); write('исходный массив: '); for i : = 1 to n do begin a[i] : = random(41) - 20; write(a[i], ' ') end; write(#13#10,'массив-результат: '); for i : = 1 to n do begin if a[i] > 10 then a[i] : = c; write(a[i], ' ') end end. тестовое решение: введите число элементов массива (не более 20): 18 введите целое число с: 99 исходный массив: -1 -17 -15 16 12 -12 14 19 -1 18 13 11 -17 -6 -17 -2 20 -14 массив-результат: -1 -17 -15 99 99 -12 99 99 -1 99 99 99 -17 -6 -17 -2 99 -14

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

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

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

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

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

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

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

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

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

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