1. Информатика
  2. Снаписанием программы

Снаписанием программы в pascal. напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 5. программа получает на вход количество чисел в последовательности, а затем сами числа. в последовательности всегда имеется число, кратное 5. количество чисел не превышает 100. введённые числа не превышают 300. программа должна вывести одно число – сумму чисел, кратных 5.

KarenXacul80 KarenXacul80    3   24.09.2019 23:02    1

Ответы
ДжениферЛюдварг ДжениферЛюдварг  08.10.2020 16:51
Var
  n, sum, i, a: integer;
begin
  read(n);
  sum = 0;
  for i := 1 to n do
  begin
    read(a);
    if (a mod 5 = 0) then
      sum := sum + a;
  end;
  write(sum);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Страус123552 Страус123552  31.03.2021 18:54
Как зафиксировать картинки, чтобы при изменении масштаба сайта картинки не съезжали (т.е. были прикреплены к фону)...
AntoniaMazhar AntoniaMazhar  31.03.2021 18:53
Подумай и напиши! Напиши назначения команд блока ПеременныеНазначенияКомандаЗадать xзначение оизменитьПоказать переменнуюскрыть переменную ​...
Frog12321nik Frog12321nik  31.03.2021 18:53
Квадратичну функцію задано формулою y=-x2-x+9 на проміжку [-3; 6]. Обчисліть значення функції для 10 аргументів з області визначенняЗнайдіть мінімальне та максимальне...
rlynx675 rlynx675  19.09.2019 06:40
Напишите программу в паскаль, 50 )) определить количество повторений каждой из цифр 0,1, в числе n! , где n≤9, n-натуральное. напоминание: n! = 1*2*3*4*….*n....
mssuslova1980 mssuslova1980  19.09.2019 06:40
Как можно передавать различные документы между компьютерами без использования сети интернет и различных переносных носителей(флэшки и тому подобного)...
tana29143Танечка tana29143Танечка  11.08.2019 17:40
Найди значение выражения 1& 1& 1& 1& 1& 1...
irisha190784 irisha190784  20.02.2020 01:36
Какая метрика информационной системы показывает, насколько правильна технология архивирования параметров?...
nik868 nik868  20.02.2020 01:33
Что собой представляет профайл безопасности информационной системы, и какие параметры в нем должны быть, например, для платежной карточной системы?...
lol1046 lol1046  13.01.2021 20:11
написать программу на Паскале Нужно до завтра. 1)Напишите программу, которая в последовательности натуральных чисел определяет максимальное нечётное число.Программа...
misterfarhat11 misterfarhat11  13.01.2021 20:10
Ячейка не может содержать данные в виде...​...

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