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

0 голосов
31 просмотров

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


Информатика (22 баллов) | 31 просмотров
Дан 1 ответ
0 голосов

Var
mas: array [1..7] of integer;
s,i: integer;
begin
s := 1;
for i := 1 to 7 do if mas[i]>5 then s := s * mas[i];
end;

(1.2k баллов)
0

спасибо
это точное решение)

0

??

0

ась? не за что))

0

это точный ответ?
тоесть правильный?

0

вот теперь правильно. я сначала посчитал сумму))

0

a mas это что?

0

а это массив из 7 чисел. или они как-то по-другому определены?

0

все я поняла спасибо большое