В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Partners04
Partners04
16.01.2021 15:51 •  Информатика

Информатика Задание в Excel. 60б
Составьте таблицу, по которой определите, какие условия вклада в банк выгоднее клиенту: 24% годовых с начислением процентов ежемесячно или 26% годовых с начислением процентов каждые полгода.

Показать ответ
Ответ:
П6о6л6я
П6о6л6я
14.03.2022 07:02

PascalABC.NET 3.7:

###var names := ReadString('Введите имена:').ToWords;var values := ReadArrInteger('Введите возраста:', names.Len);var m := values.Max;var a := values.Indices(x → x = m).Sel(i → names[i]).toA;if a.Len = values.Len then Pr('У всех одинаковый возраст.')else if a.Len = 1 then Pr(a[0], 'старше всех.')else Pr(a[:^1].JoinToString(', '), 'и', a[^1], 'старше всех.')

Объяснение:

С реализуем вывод приглашения к вводу ("Введите имена:") и запрос на ввод строки. После чего, ToWords преобразует введённую строку в массив слов. Этот полученный массив (массив введённых через пробел имён) записывается в переменную names.

С реализуем вывод приглашения к вводу ("Введите возраста:") и запрос на ввод массива чисел, длину которого (количество вводимых чисел) мы задали с длина массива names). Этот массив чисел записывается в переменную values. Числа можно вводить как через пробел, так и с новой строки.

С метода расширения Max находим максимальный элемент массива values и записываем его в переменную m.

С метода расширения Indices получаем последовательность индексов, удовлетворяющим условию x = m, где x — тот или иной элемент массива values. Затем, с метода Sel проецируем каждый элемент полученной последовательности в новую форму: из i в names[i], то есть из каждого индекса, условно обозначенным как i, мы получаем имя, хранящееся в массиве names под индексом i. Далее метод ToA преобразует последовательность в массив, и этот массив записывается в переменную a.

И вот, мы уже имеем ответ: все нам нужные имена хранятся в массиве a. Идущие далее 3 строчки обеспечивают "красивый" вывод "на всевозможные случаи". Их можно заменить на a.Pr — все элементы массива a будут выведены через пробел. Но рассмотрим эти "3 строчки".

Если длина массива a равна длине массива values (то есть в массив a были отобраны все элементы массива values), то выводим сообщение "У всех одинаковый возраст.". Иначе, если длина массива a равна 1, то выводим этот единственный элемент массива a с сообщением "старше всех.". Если же не выполняется ни то, ни другое условие, то на экран через пробел будет выведено следующее:

все элементы массива a, кроме последнего, которые с преобразовали в строку, используя ", " в качестве разделителя;"и";последний элемент массива a;"старше всех.".

Пример работы:


Напишите программу, которая получает с клавиатуры возрасты трёх человек (антона, бориса и виктора) и
Напишите программу, которая получает с клавиатуры возрасты трёх человек (антона, бориса и виктора) и
Напишите программу, которая получает с клавиатуры возрасты трёх человек (антона, бориса и виктора) и
Напишите программу, которая получает с клавиатуры возрасты трёх человек (антона, бориса и виктора) и
Напишите программу, которая получает с клавиатуры возрасты трёх человек (антона, бориса и виктора) и
0,0(0 оценок)
Ответ:
SaSeRoS
SaSeRoS
01.03.2021 09:05
Вопрос странный, он требует наличия знания о производителях марок машин.
Peugeot - французская марка, Mercedes - немецкая, Toyota - японская.

"Только у Фёдорова мечта сбылась о немецкой машине" - следовательно, он купил Мерседес.

"Поляков мечтал о французской машине, но его мечта тоже не сбылась".
Он не купил Пежо, но и Мерседес он тоже не купил, потому что его купил Федоров. Следовательно, Поляков купил Тойоту.

Тогда Петровой осталась только Пежо. Информация о Петровой в задании абсолютно лишняя ("Петрова рассказала хозяину Toyota, что с детства мечтала о немецкой машине. Но её мечта не сбылась")

ответ: Федоров - Мерседес, Поляков - Тойота, Петрова - Пежо.
 
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота