Регистрация
MarySolov
30.11.2022 09:41
Информатика
Есть ответ 👍

Задание - написать программы: 1. Дан двумерный массив заполнить его целыми случайными числами
из интервала от -30 до 50. Все положительные элементы ОМ
заменить на 5, а отрицательные на 7.
2. Дан двумерный массив заполнить его целыми случайными числами
из интервала от -40 до 60.Найти произведение положительных и
сумму отрицательных элементов ОМ.

ОМ-одномерный массив
с array

285
422
Посмотреть ответы 1

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

AishaZamyjem8
AishaZamyjem8
4,7(1 оценок)

var  a, s: integer; // целочисленный тип данныхbeginwriteln('введите число: ');   readln(a); // вводим число (можно больше трех знаков)  while a < > 0 do  // пока остались цифры в числе   begin      s : = s + (a mod 10); // отбираем последнюю цифру числа и прибавляем к сумме      a : = a div 10; // стираем последнюю цифру числа  end;   writeln('сумма цифр = ', s) // выводим результатend.

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