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

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

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


Информатика (22 баллов)
Дан 1 ответ
0 голосов
Одаренный (1.2k баллов)

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;

оставил комментарий (22 баллов)

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

оставил комментарий (22 баллов)

??

оставил комментарий Одаренный (1.2k баллов)

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

оставил комментарий (22 баллов)

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

оставил комментарий Одаренный (1.2k баллов)

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

оставил комментарий (22 баллов)

a mas это что?

оставил комментарий Одаренный (1.2k баллов)

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

оставил комментарий (22 баллов)

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

...