Смодема (скорость 79 кб/с) скачали сообщение за 9 секунд. определить информационный объём и количество символов в сообщение ?
146
454
Ответы на вопрос:
Var a,i,k: byte; begin write('простые двузначные числа: '); for a: = 10 to 99 do begin k: =0; for i: = 2 to a div 2 do if a mod i = 0 then k: =k+1; if k = 0 then write(' ',a) end end. результат работы программы: простые двузначные числа: 11 13 17 19 23 29 31 37 41 43 47 53 59 61 67 71 73 79 83 89 97
Популярно: Информатика
-
sladenykaya13617.05.2020 10:58
-
Legion2K1701.01.2021 01:36
-
Lika3921104.06.2021 20:42
-
varkraft01.04.2022 07:26
-
nastya63201125.10.2020 18:33
-
Desa1106.11.2022 08:28
-
mirator9106.05.2022 15:30
-
IamInga1828.04.2020 23:05
-
Ruslan228936509.07.2020 21:01
-
СССС6912.05.2023 08:24