Есть ответ 👍

Найти минимальное натуральное число, которое при делении на 2 даёт в остатке 1, при делении на 3 даёт в остатке 2, при делении на 4 - в остатке 3, при делении на 5 - в остатке 4, при делении на 6 - в остатке 5 а при делении на 7 в остатке 6.

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

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

SVT38
4,7(80 оценок)

//pascal var i,n: integer; flag: boolean; begin   flag: =false; //такое число еще не найдено   i: =13; //первое число,которое в остаке от деления на 7 дает 6   while not flag do begin       if (i mod 2=1) and (i mod 3=2)and (i mod 4=3)and (i mod 5=4)and (i mod 6=5)and (i mod 7=6) then       begin       n: =i; flag: =true;       end;       i: =i+1;   end;   writeln('найденное число ',n); end. число = 419

1. программа вводится в компьютер и храниться в той же памяти, что и данные к ней. 2. команды, составляющие программу, представляются в том же числовом коде, что и данные к ней. это значит, что с кодом программы можно производить те же действия, что и данные к ней. 

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