Ответы на вопрос:
Const n=10; var a: array[1..n] of integer; sum,i: integer; begin sum: =0; for i: =1 to n do begin readln(a[i]); if a[i]> 0 then sum: =sum+a[i]; end; writeln(sum); end.
ответ:прэсутствуетпрэсутствуетпрэсутствует
прэсутствуетпрэсутствуетпрэсутствует
прэсутствуетпрэспрэсутствупрэсутствуетпрэсутствуететпрэсутствуетутствуетпрэсутствуетпрэсуввфвпрэсутствуетпрэсутствуетпрэсутствуеттствуетпрэсутствуетпрэсутствует
Популярно: Информатика
-
Yaneken26.03.2020 12:19
-
Юра75417.03.2021 02:14
-
alex2007serg06.08.2022 05:12
-
morozhenkom02.08.2020 19:35
-
zagena0909.01.2020 01:33
-
10MisisVika1028.01.2023 11:00
-
DanilДюжик02.09.2020 11:11
-
iamzayka19.12.2021 15:53
-
mark0206200518.11.2020 08:56
-
ирбиз29.11.2022 23:37