Регистрация
Superklass1111
09.09.2021 12:45
Информатика
Есть ответ 👍

Найти произведение положительных чисел значение которых не превышают 5 из 10 введённых !

185
212
Посмотреть ответы 2

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

ruzall
ruzall
4,4(91 оценок)
Program n1; var a,p,i: integer; begin p: =1; for i: =1 to 10 do begin readln(a); if (a> 0) and (a< =5) then p: =p*a; end; writeln(p); end.
vlada362
vlada362
4,8(24 оценок)

тошто сосуд сфиский и изготовлен 5 веке

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