tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Склавиатуры вводится последовательность
Склавиатуры вводится последовательность чисел необходимо их сумировать пока не будет введено число кратное 2.результат вывести на экран. заранее
milochkarodтирмепнрн
1 17.08.2019 19:50
0
Ответы
4686532
05.10.2020 01:24
Program v;
Var a,b:integer;
BEGIN
a:=1;
While (a mod 2 <> 0) do begin
readln (a);
if (a mod 2 <> 0) then
b:=b+a;
end;
writeln (b);
END.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
ЭлькаКотикучитсяна5
30.05.2019 01:10
Склавиатуры вводятся оценки учащихся. подсчитать количество сдавших экзамен (получили оценку не менее 3) и не сдавших предмет(получили 2). программа паскаль. тема- цикл с...
Yaroslav34364
30.05.2019 01:10
Для кодирования букв абвг решили использовать трёхразрядные последовательные двоичные числа от 000 до 100 соответственно. закодировать последовательность символов дгбав и...
лера2083
09.09.2021 09:51
Недостатком какой топологии сети является тот факт, что выход из строя хотя бы одного рабочего узла с высокой вероятностью прекратит передачу данных во всей сети? шина кольцо...
Ritochkа
09.09.2021 09:50
Назовите топологию сети, в которой есть некоторое главное устройство, к которому подключены все остальные....
fuccatsumi1
09.09.2021 09:49
информатика Найдите сумму углов выпуклого тринадцатиугольника. Составьте алгоритм на алгоритмическом языке для решения данной задачи....
Анастасия105
08.10.2019 04:10
Составить алгоритм и программу для вычисления: p=n*k пока n не будет равно 10...
slyzova1
08.10.2019 04:10
Excel. 1)чтобы выполнить быстрое заполнение таблицы если известен шаг изменения числовой величины 2)чтобы записать формулу в ячейку таблицы 3)чтобы выделить группу ячеек(диапазон)...
julietsimms
08.10.2019 04:20
1) что такое пк? опишите его 2) из каких компонентов состоит системный блок? 3) что такое материнская плата и зачем она нужна? 4) что такое блок питания и зачем он нужен?...
yuliyamusatova1
12.05.2020 21:40
Встановіть порядок виконання операторів програми для визначення більш нічого з трьох чисел ABC приклад відповіді 4 3 2 1 через пропуск...
Maga052005
12.05.2020 21:40
Навіщо створений метод поділу на підзадачі ?...
Популярные вопросы
Было 53х груши. после того как каждую из них разделили пополам, стало136хполовинок....
1
Сократите. пожлуйста . x^3-27/x^2-6x+9()...
1
Какие детали наиболее важны для понимания характера и поступков пугачёва...
1
2-метил-пропанол-2 составьте формулу данного вещества и укажите массовую...
3
Решение скорость катера против течения реки 14 целых одна вторая км/ч.сколько...
1
Проверьте симметрии двух чисел (пример 1245 и 5421 -симметричны), 1245...
1
При каких условиях в цепи возникает короткое замыкание...
1
Рассказать о слитном и раздельном написании не с глаголами и существительным...
1
Какие элементы европейской демократии были привнесены в государственное...
1
Яне знаю как делать пересказы ну например перес каз рассказа арбузный переулок...
3
Var a,b:integer;
BEGIN
a:=1;
While (a mod 2 <> 0) do begin
readln (a);
if (a mod 2 <> 0) then
b:=b+a;
end;
writeln (b);
END.