1. Информатика
  2. Напишите программу вычесления

Напишите программу вычесления суммы чисел, кратных трём из 10 чисел введённых с клавиатуры.

ggghh99 ggghh99    2   18.09.2019 18:50    0

Ответы
katyavoloshina1 katyavoloshina1  30.04.2020 14:43
//PascalABC.NET
//Версия 3.3, сборка 1627
begin
write(ReadSeqInteger(10).Where(x->x mod 3=0).Sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ukjlobfnjh ukjlobfnjh  26.08.2019 20:00
Файл размером 6мбайт передаётся через некоторое соединение за 2 минуты 30 секунд. определите размер файла(в мбайтах), который можно передать через это же соединение за 50 секунд....
saphiro12 saphiro12  12.05.2021 12:17
2. Щ 3. Що таке функція в ЕТ? Наведіть приклад її використання.4. Що таке посилання у формулах ЕТ? У чому відмінність записувідносних і абсолютних посилань?5. Яким чином можна...
nadyam1982 nadyam1982  12.05.2021 12:16
Функція в ЕТ? Наведіть приклад її використання. рядка?4. Що таке посилання у формулах ЕТ? У чому відмінність записувідносних і абсолютних посилань?5. Яким чином можна копіювати...
Dashazavalish Dashazavalish  12.05.2021 12:16
Чем в браузере отличается вкладка от окна? Выбери наиболее верное объяснение...
ksusha2311021 ksusha2311021  26.04.2021 09:32
2. Визначити відносну молекулярну масу : A) калій оксиду; Б)купрум (II) оксиду; в) карбон (IV) оксиду. (36) ​...
Емсимася Емсимася  26.04.2021 09:33
На рисунке схема дорог Д-ского района изображена в виде графа, в таблице содержатся сведения о длине этих дорог в километрах.Так как таблицу и схему рисовали независимо друг от...
deadcreamrus deadcreamrus  26.04.2021 09:34
Верно ли утверждение, что большое влияние на развитие компьютернойи мобильной техники оказываетпрогресс в области компьютерныхразработок надо ​...
urbutite71 urbutite71  26.04.2021 09:35
ответить на вопросы. За просто написанное сообщение не по теме вопроса бан....
Wow01 Wow01  26.04.2021 09:36
Очень нужно с exel даны 2 функции 1) y=a+2x и 2)a=3 y=ax^2+4 -5 на одной даграмме нужно построить грфики функции...
linakn14 linakn14  26.04.2021 09:39
1=[4, 8, 15, 16, 23, 42) for n in 1:print(n)print (1[ 2:51)Результатом програми буде запис:print()15,16,23,4215,16,2315,1616,23,42​...

Популярные вопросы