Дано 7 чисел. Найти произведение чисел больших 5.
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;
спасибо это точное решение)
??
ась? не за что))
это точный ответ? тоесть правильный?
вот теперь правильно. я сначала посчитал сумму))
a mas это что?
а это массив из 7 чисел. или они как-то по-другому определены?
все я поняла спасибо большое