Смоделировать структуру компании сотовой связи на языке Java. Все условия представлены в прикрепленном файле
208
423
Ответы на вопрос:
1)
var
i,k: integer;
a: array [1..14] of integer;
begin
k: =0;
for i: =1 to 14 do
begin
a[i]: =random(46)-15;
write(a[i]: 3);
if a[i] mod 2=0 then k: =i;
end;
if k> 0 then
begin
for i: =k to 13 do a[i]: =a[i]+1;
a[14]: =0;
end;
writeln;
for i: =1 to 14 do write(a[i]: 3);
end.
2)
var
i,k: integer;
a: array [1..14] of integer;
begin
for i: =1 to 14 do
begin
a[i]: =random(46)-15;
write(a[i]: 3);
end;
for i: =1 to 7 do
begin
k: =a[i];
a[i]: =a[i+7];
a[i+7]: =k;
end;
writeln;
for i: =1 to 14 do write(a[i]: 3);
end.
Популярно: Информатика
-
Bibika200522.12.2022 14:19
-
katalkina1702.04.2021 23:23
-
Babikovandrei4820.11.2022 17:11
-
ReyLiv17.01.2023 22:10
-
zlatovlaska10.04.2023 05:40
-
Ильдар2111117.04.2020 15:22
-
DalinaSisters12.02.2022 21:04
-
дизззи25.02.2023 00:04
-
Roblox201731.12.2021 23:52
-
викусямиуся04.06.2021 07:13