Найдите k k:=1 for c:=1 to 5 do if c mod 2 <>0 then k:=k*c;

Ответы:
Таисия Вышневецькая
12-06-2018 16:54

Var    k, c: integer;begin    k := 1;    for c := 1 to 5 do        if c mod 2 <> 0 then             k := k * c;    writeln(k);end.Ответ 15

Картинка с текстом вопроса от пользователя Ulyana Antipina

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Найдите k k:=1 for c:=1 to 5 do if c mod 2 <>0 then k:=k*c;» от пользователя Ulyana Antipina в разделе Информатика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!