В одной из кодировок Unicode каждый символ кодируется двумя байтами. Определите размер следующего предложения в данной кодировке. *
152
465
Ответы на вопрос:
//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
Популярно: Информатика
-
Danilfaha19.06.2020 19:08
-
SkrepllexNormaN22.05.2020 05:53
-
ИгорьВсемогущий25.01.2022 03:05
-
astimorget13.09.2020 03:16
-
мда2821.12.2022 17:47
-
BMBelenapertsevanika21.06.2023 17:22
-
nikolayy22050219.01.2021 23:33
-
kalmanbaevarrr21.12.2021 09:39
-
6hh6h6h18.07.2021 10:19
-
helpmepleasehelpls17.07.2021 21:44