Напишите программу на языке программирования (или составьте алгоритм). дано натуральное число n, целые числа a a an , , 1 2 . определите номер предпоследнего из членов последовательности a a an , , 1 2 кратных 3; если членов, удовлетворяющих данным условиям, нет, то ответом должно быть «нет».
127
418
Ответы на вопрос:
Const n=10; var a: array[1..n] of integer; i,k: integer; begin randomize; for i: =1 to n do begin a[i]: =random(50); write(a[i]: 3); end; writeln; k: =0; i: =n; while (i> 0)and(k< 2) do begin if a[i] mod 3 = 0 then k: =k+1; i: =i-1; end; if k=2 then writeln('искомый номер = ',i+1) else writeln('нет '); end. пример: 22 13 42 48 26 2 18 30 11 31 искомый номер = 7
Код pascal: var n,m,i,a: integer; begin read(n); m: =0; i: =0; for n: = 1 to n do begin read(a); if a mod 3 = 0 then if n > m then begin i: =m; m: =n; end end; if i = 0 then write('нет') else write(i) end.
1) -це фрагмент алгоритму, у якому одне розгалуження міститься всередині іншого розгалуження
3) один з двох варіантів
Объяснение:
Популярно: Информатика
-
аzат13.01.2021 14:01
-
Rube13454hill07.01.2021 05:19
-
esyajm17.11.2022 19:45
-
polina03313.05.2023 19:02
-
Adventurous02.04.2021 23:25
-
hackerprincess30.05.2021 20:47
-
068082042922.06.2021 09:08
-
wutter9929.08.2020 18:21
-
альбинка2514.04.2023 16:40
-
DARO10014.05.2020 15:48