Составить программу на языке паскаль, которая запрашивает у пользователя некоторое количество трехзначных чисел и выводит на экран цифру, находящуюся в середине каждого полученного числа. не в коем случае не используй их: last, const, count. делай обыкновенным способом.

163

443

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

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

ЛамповыйКун1

Информатика

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

Program n_5; var a, b, c: real; procedure n_1; begin if ((a< b) and (a> c)) or ((a< c) and (a> b)) then write (a) else if ((b< a) and (b> c)) or ((b< c) and (b> a)) then write (b) else if ((c< a) and (c< b)) or ((c< b) and (c> a)) then write (c); end; begin writeln ('введите три трёхзначных числа'); readln (a); readln (b); readln (c); if ((a > = 100) and (a < = 999) and (a < > b) and (a < > c)) and ((b > = 100) and (b < = 999) and (b < > a) and (b < > c)) and ((c > = 100) and (c < = 999) and (c < > a) and (c < > b)) then n_1 else write ('error'); end.

Maaaarrr

Информатика

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

Var i, x, y: integer; a: array [1..255] of integer; function sr(i: integer): string; begin sr: =inttostr(i)[2]; end; begin writeln('vvedite kol-vo chisel'); read(x); for i: =1 to x do read(a[i]); writeln(); for i: =1 to x do writeln(sr(a[i])); end.

sashamakarova30

Информатика

4,7(45 оценок)

Что такое беспроводная сеть?

Беспроводная локальная сеть (LAN) использует радиоволны для подключения различных устройств, например ноутбуков и мобильных телефонов, к Интернету, сети вашей компании и ее приложениям.

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

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

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

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

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

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

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

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

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

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