Регистрация
Despair1704
13.02.2022 17:24
Информатика
Есть ответ 👍

Решение в turbo/free pascal 1) написать программу. массив из 10 чисел заполнить с клавиатуры. определить сколько двузначных чисел начинаются на нечётную цифру. 2) написать программу. массив из 20 чисел заполнить случайными числами [-100, 100]. найти величину максимального отклонения (модуля разности) между любыми двумя элементами массива. 3) написать программу. массив из 10 чисел заполнить с клавиатуры. определить сумму чисел, начинающихся на цифру 5. , к утру нужны программы.

283
386
Посмотреть ответы 1

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

Smash2302
Smash2302
4,7(75 оценок)
Program sh; var n,k: integer; begin write('введите кол-во школьников: '); readln(n); write('введите кол-во яблок: '); readln(k); writeln('останется в корзинке: ', k mod n); writeln('достанется каждому по ', k div n); end.

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