Вопрос по информатике:
Задача 7. Найти первый и последний элементы массива, кратные
числу 3.
Пример: массив 7 2 6 5 4 4 10 3 9
элементы, кратные 3 6 39
первый и последний из них 6 9
- 04.08.2018 21:57
- Информатика
- remove_red_eye 6225
- thumb_up 19
Ответы и объяснения 1
Var
a: array of byte := (7, 2, 6, 5, 4, 4, 10, 3, 9);
min, max: byte;
begin
write('Кратные трём: ');
foreach i: byte in a do
if (i mod 3 = 0) then
begin
write(i, ' ');
if (min = 0) then
min := i
else
max := i;
end;
if (max = 0) then
max := min;
writeln();
writeln(min, ' ', max);
end.
- 05.08.2018 07:02
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.