Описать массив с именем MSS, состоящий из
5-9 класс
|
9 элементов целого
типа. Сфоpмиpуй его пpи помощи датчика случайных чисел(от 2 до
250).Распечатай на экpан элементы кpатные 5.(Всё это одна пpогpамма)
var mss:array[1..9] of integer;
i:integer;
begin
for i:=1 to 9 do mss[i]:=random(248)+2;
for i:=1 to 9 do write(mss[i]:4);
writeln;
for i:=1 to 9 do begin
if (mss[i] mod 5 = 0) then writeln(mss[i]);
end;
end.
Другие вопросы из категории
4. Компьютер перебирает четные числа до тех пор, пока сума их квадратов не превысит S. Чему равна сумма квадратов?
Подсказка:
Начальное значение переменной цикла – 2. Шаг изменения – 2 (перебираем четные числа).
Считаем сумму квадратов до тех пор пока она меньше или равна S.
Вывод на экран :
Результат:
s =
Тест 1:
Исходные данные:
s = 24
Результат:
s =56
Тест 2:
Исходные данные:
s = 85
Результат:
s =120
В кодировке КОИ-8 на каждый символ отводится 8 бит.
Определите информационный объём сообщения из 17 символов в этой кодировке.
Читайте также
от -100 до 100. Определить минимальное положительное число.
2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
типа. Ввод организуйе без использования цикла 2) разработайте алгоритм для ввода в память ЭВМ одномерного массива С состоященр из 7 элементов целого тип. Ввод организуйе с исползованием цикла "ДЛЯ". 3) разработайте алгоритм для ввода в память ЭВМ одномерного массива Д состоящего из 10 элементов целого типа. Каждый элемнт вычислите по формуле: значение элемента равно квадрату его индекса