Ответы на вопрос:
Uses crt; const b = 10; var x=0,y=0; integer; a = array[10..b] of integer; begin for x: =0 to b do if(a[i]mod3=0 and a[i]mod10=3) there begin x: =x+1; y: =y+a[i]; end; writeln(x,y); end.
Популярно: Информатика
-
angelokfrimen04.04.2021 10:18
-
zlata2514823.05.2023 06:21
-
fietisov29.10.2022 08:22
-
Meshnyakova5220.11.2020 03:52
-
selman2006130.12.2022 15:17
-
ruslangusen24.09.2021 13:34
-
suvorovka0612.09.2020 08:59
-
Cat123567921.07.2022 15:08
-
Zlatasolnce05.08.2022 06:44
-
golubfrog12.06.2021 05:19