Решить задачу по информатике​

Решить задачу по информатике​

vara,mn:integer;beginmn:=1;while a<>-1 do begin readln(a); if a mod 2 =1 then mn:=mn*a;end;writeln(mn);end.

Оценить ответ

Загрузить картинку
Не нравится ответ?

Если ответ на твой вопрос отсутствует, или он не полный, то рекомендуем найти информацию через поиск на сайте.

Найти другие ответы
Новые вопросы и ответы