Решить на pascal. прописать к числу 125 слева и справа по одной цифре так, чтобы полученное пятизначное число делилось на 3; 4 и 7. на вложенные циклы

160

235

Посмотреть ответы 2

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

diatel83

Информатика

4,8(97 оценок)

Const a: array [1..3] of integer=(3,4,7); var n, m, i,j : integer; s,t: string; begin for i : =1 to 9 do begin s: ='125'; str(i,t); s: = t + s + t; for j: = 1 to 3 do begin n: = strtoint(s); if n mod a[j] = 0 then m: = m +1; //writeln(n); end; if m = 3 then writeln(n); s: =''; m: =0; end; end.

Nastya28612

Информатика

4,6(28 оценок)

Информационная модель — модель объекта, представленная в виде информации, описывающей существенные для данного рассмотрения параметры и переменные величины объекта, связи между ними, входы и выходы объекта и позволяющая путём подачи на модель информации об изменениях входных величин моделировать возможные состояния объекта