М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
1234567891155
1234567891155
09.09.2021 19:16 •  Информатика

Даны натуральное число n и целые числа a1, a2, ..., an. Найти номер максимального и номер минимального из чисел ai . Если чисел с максимальным или с минимальным значением несколько, то должны быть найдены номера последних из них.(в паскале)​

👇
Открыть все ответы
Ответ:
ekaterinasolda
ekaterinasolda
09.09.2021

Для введення в форму даних, які можуть мати тільки одне з двох допустимих значень, призначені елементи управління CheckBox, або прапорці. Прапорці дозволяють користувачеві дати відповідь на поставлене запитання. У разі позитивної відповіді користувач встановлює прапорець, і він набуває вигляду квадрата, в якому розміщена галочка. При невстановленому прапорці він має вигляд порожнього квадрата, позначаючи негативну відповідь на поставлене запитання. Можливий ще один стан прапорця, при якому він не визначений. У цьому стані він має вигляд галочки на сірому тлі.

4,7(9 оценок)
Ответ:
R010KMB
R010KMB
09.09.2021

PascalABC.NET 3.5.1

begin

 var a := ReadString().ToCharArray.ToList; //Читаем с консоли число как строку, разбиваем на массив символов и приводим к типу List<T> для удобства работы

 var fnum := a[0];  //Запишем в переменную fnum первый элемент получившегося списка цифр нашего числа (то бишь первую слева цифру)

 a.Remove(fnum);  //Удалим из этого списка эту цифру

 a.AddRange(Seq(fnum, fnum));  //Добавим в конец нашего списка цифр эту самую последнюю цифру два раза

 a.JoinIntoString.Println; //Соберём элементы нашего списка в строку и выведем на печать

end.

Объяснение:

4,6(4 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ