Задать вопрос
16 июня, 19:39

Найдите k

k:=1

for c:=1 to 5 do

if c mod 2 0 then k:=k*c;

+5
Ответы (1)
  1. 16 июня, 20:55
    0
    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
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Найдите k k:=1 for c:=1 to 5 do if c mod 2 0 then k:=k*c; ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы