tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Среди введённых n чисел найти
Среди введённых n чисел найти сумму всех чётных чисел. (в pascal )
pollvasiltv
2 16.06.2019 01:10
0
Ответы
Данилкакрутой
12.07.2020 22:55
Program gt;
var n,i,a,s:integer;
begin
readln(n);
s:=0;
for i:=1 to n do
begin
read(a);
if(a mod 2=0)then s:=s+a;
end;
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
alina245717887
02.04.2020 11:25
информатику Марату нарисовать параллелепипед. b. Установите правильную последовательность рисования параллелепипеда. № Действие Тянуть верх Растягиваем в нужную сторону...
newzorowaa2018
02.04.2020 11:32
Написать программу Pascal Написать программу, которая находит произведение элементов массива натуральных чисел из 15 элементов, заданного случайным образом....
cook16
02.04.2020 11:30
В одной из кодировок Unicode каждый символ кодируется 2 байтами.При подготовке реферата по истории Саша написал следующий текст (в нём нет лишнихпробелов).«Во многих городах...
ксю1239
02.04.2020 11:29
Каким будет результат этой программы?x=4foo=15Print (foo). Каким будет результат этого выражения?Spam= window Print(spam*4)...
Djunisova
02.04.2020 11:38
Все 5-буквенные слова составленные из букв г, д,о, записаны в алфавитном порядке .Вот начало списка: 1. 2.Д 3.О 4.ГГГДГ ... Укажите номер,под которым в этом списке будет...
Itismylife
02.04.2020 11:40
ИНФОРМАТИКА. Нужно описать процедуры или доказать Опишите процедуры нахождения символа К. Якоби и символа А.-М. Лежандра.или (на приложенном скриншоте)...
малина106
02.04.2020 11:38
Каким будет результат этого выражения? Spam= window Print(spam*4) Каким будет результат этой программы? x=4 foo=15 Print (foo)...
eva301
02.04.2020 11:47
Какой используется компонент для создания массива?...
ghvcn
02.04.2020 12:00
Назвіть основну властивість алгоритму, яка говорить про те, що алгоритм повинен призводити до вирішення завдання за певне число кроків:A) Дискретність;B) Визначеність;C)...
sergo196
02.04.2020 12:00
Розгалужуючий алгоритм - це:A) Присутність в алгоритмі хоча б однієї умови;B) Набір команд, які виконуються послідовно один за одним;C) Багаторазове виконання одних і...
Популярные вопросы
В каком веке сложился новый вид музыкальных произведений – симфония:...
2
ДОПОЖІТЬ БУДЬ ЛАСКА За формулою (1) розрахувати масу йоду, необхідну...
3
Яка частина енергії світу виробляється вітровими електростанціями?...
1
Знайдіть сторону АС АВС якщо АВ=1см В=45 С= 30...
2
10. Чи погоджуєтесь ви з думкою: Початок ХХ ст. час політизації українського...
1
До іть терміново з алгеброю...
3
(5542587254276542643284375-88276÷(828753891998738+99198763865))+88827653...
2
Listening Comprehension Test Glasgow Listen to the text and do the...
3
Как мейоз вызывает генетическое разнообразие и как он связан с научным...
2
Найдите разность емкости.Результат выразите в миллиметрах 1)1целых...
3
var n,i,a,s:integer;
begin
readln(n);
s:=0;
for i:=1 to n do
begin
read(a);
if(a mod 2=0)then s:=s+a;
end;
writeln(s);
end.