Срочно!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Приложения:
Ответы на вопрос
Ответил m0nclous
0
3) Вывести числа....
Var i:integer;
Begin
i:=10000;
while (i<99999) do begin
if (i mod 194 = 0) then begin write(' ',i); i:=i+194 end
else i:=i+1;
end;
end.
Приложения:
Ответил m0nclous
0
Скрины работы программы прикрепить?
Ответил karina982
0
давай
Ответил m0nclous
0
короч 1 не правильная, правильная только 3. Я тебя предупреждал что мы не проходили эти прогрессии и без объяснения я не смогу перевести
Новые вопросы