Найти минимальное натуральное число, которое при делении на 2 даёт в остатке 1, при делении на 3 даёт в остатке 2, при делении на 4 - в остатке 3, при делении на 5 - в остатке 4, при делении на 6 - в остатке 5 а при делении на 7 в остатке 6.
190
320
Ответы на вопрос:
//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. команды, составляющие программу, представляются в том же числовом коде, что и данные к ней. это значит, что с кодом программы можно производить те же действия, что и данные к ней.
Популярно: Информатика
-
atoko29.07.2022 16:40
-
Sone4ka111102.09.2021 14:38
-
человекимир505.04.2022 02:28
-
Агата171318.06.2022 20:29
-
Herty2243621.07.2022 11:48
-
Евус111122.02.2023 16:10
-
ivanivanlushch04.09.2021 04:50
-
KostyaBit24.05.2022 06:47
-
jessyss03.01.2022 18:31
-
Даддсаап07.05.2020 18:48