Регистрация
elenka421
05.04.2023 09:16
Информатика
Есть ответ 👍

Pascal, массивы 1)в массиве а[100] уменьшить все числа кратные 7 на величину последнего элемента массива. написать фрагмент программы.

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

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

Do1git
Do1git
4,6(97 оценок)
Var a: array[1..999] of integer; begin     for var i : = 1 to 100 do begin         a[i] : = random(1, 100);         write(a[i] + ' ');     end;     writeln;     for var i : = 1 to 100 do begin         if a[i] mod 7 = 0 then             a[i] -= a[100];         write(a[i] + ' ');     end; end.
Куколка111
Куколка111
4,7(59 оценок)

Автомат получает на вход трёхзначное десятичное число. По полученному числу строится новое десятичное

число по следующим правилам:

1. Вычисляются два числа — сумма старшего и среднего разрядов, а также сумма среднего и младшего разрядов

заданного числа.

2. Полученные два числа записываются друг за другом в порядке невозрастания (без разделителей).

Пример:

Исходное число: 277. Поразрядные суммы: 9, 14. Результат: 149.

Отметь, какие из приведённых ниже чисел могут получиться в результате работы автомата.

1111, 129, 133, 1914, 1819, 317, 911, 116.

(Выбери верные варианты)

О129

О 133

О 1914

0911

01111

О1819

Объяснение:

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