Переведите в другие единицы измерения.
1.24 байта=... бита
2.1024 мб=... кб
3.2 гб=... байт
174
209
Ответы на вопрос:
Var a,b,c,prime: longhint; begin writeln('введите число'); readln(a); c: =a; for b: =1 to a do begin if (c mod b=0) then prime: =prime+1; end; if (prime> 2) then writeln('число не простое') else writeln('число простое '); end.
Популярно: Информатика
-
bogdan97531.07.2022 18:14
-
Віталій12814.08.2021 18:48
-
111rrrr4544tgd05.01.2022 14:05
-
Маргаритта35728.05.2021 17:51
-
Anasteyzhaaaaaa17.02.2021 21:59
-
zinina117826.05.2023 18:27
-
оеавц28.03.2023 04:04
-
mashtaleroksana08.08.2022 07:16
-
deloranka01.03.2022 19:59
-
alexandrafortun25.01.2020 14:33