Регистрация
Barsik12847
22.02.2023 13:25
Информатика
Есть ответ 👍

….
3. Составьте программу решения математического выражения.

109
258
Посмотреть ответы 1

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

VladProstoboy
VladProstoboy
4,6(11 оценок)
Var x,k,m,n: integer; begin readln(k,m,n); x: =0; repeat x: =x+1; until (x mod 3 = k)and(x mod 5 = m)and(x mod 7 = n)and(x< 100); if x< 100 then writeln(x) else writeln('ошибка ввода'); end. пример: 0 3 6 48

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