Составить программу для ввода в масив из 12 элементов цифр и подсчета их суммы
125
243
Ответы на вопрос:
Var x, i: integer; a: array [0..11] of integer; begin for i : = 0 to 11 do begin readln(a[i]); x : = x + a[i]; end; writeln(x); end.работает =)
Program gt; var a: array[1..100]of longint; l,q,i,n: longint; begin read(n); for i: =1 to n do begin read(a[i]); end; for i: =n downto 1 do begin if(a[i]mod 2=0)then l: =i; end; write(l); end.
Популярно: Информатика
-
brikabrakenerge12.09.2020 22:33
-
СавелийРямов17.06.2021 23:35
-
DaiDZ19.01.2021 03:59
-
Милошка2827.07.2020 19:30
-
iSlate99927.06.2022 08:42
-
EEEboyyyyy18.03.2021 06:34
-
Vzorr19.08.2020 05:38
-
лололололлоло9720.08.2021 09:56
-
dinaumralieva11.04.2022 06:45
-
linka73702.06.2020 09:09