Дано 7 чисел. Найти творенье чисел больших 5.

Дано 7 чисел. Отыскать творенье чисел больших 5.

Задать свой вопрос
1 ответ
Var
mas: array [1..7] of integer;
s,i: integer;
begin
s := 1;
for i := 1 to 7 do if mas[i]gt;5 then s := s * mas[i];
end;

Krishtul Albina
спасибоэто четкое решение)
Борис
??
Sytezheva Julija
ась? не за что))
Вадим Днепровский
это четкий ответ?тоесть верный?
Аделина Кулихина
вот теперь правильно. я поначалу посчитал сумму))
Inna
a mas это что?
Uljana
а это массив из 7 чисел. или они как-то по-иному определены?
Генка
все я сообразила спасибо огромное
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт