Дайте наиболее точное общее имя каждой группе объектов. а)канада, бразилия, японияб)канада, сша, мексикав) лаура, эльба, вислаг) принтер, монитор,клавиатура
147
278
Ответы на вопрос:
1. страны 2. страны северной америки. 3. реки европы. 4. периферийные устройства пк.
// pascalabc.net 3.0, сборка 1128 var i,j,k,n,p: longint; f: array[1..10,1..2] of longint; begin p: =2; i: =1; f[1,1]: =1; f[1,2]: =1; write('введите натуральное число не больше 2 147 483 647: '); read(n); while n< > 1 do begin if (n mod p)=0 then begin if f[i,1]< > p then begin inc(i); f[i,1]: =p; f[i,2]: =1 end else inc(f[i,2]); n: =n div p end else inc(p) end; k: =i; for i: =2 to k do for j: =1 to f[i,2] do write(f[i,1],' '); writeln end. тестовое решение: введите натуральное число не больше 2 147 483 647: 37534 2 7 7 383
Популярно: Информатика
-
IKristin18.10.2022 05:53
-
Stasuyksuper0601.06.2020 02:05
-
Quickpool30.04.2021 14:22
-
кефирка562311.04.2023 19:56
-
EM2001130.11.2020 23:34
-
Logikahaha09.05.2020 20:58
-
Nerzul282881823.08.2021 08:56
-
Wer7709.11.2021 02:14
-
Помошь022.04.2022 09:35
-
vladchesak27.02.2023 22:45