Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
СлаваБорисов123
26.07.2021 06:42 •
Информатика
На языке qbasic составить программу вычисления суммы и печати нечетных элементов, введенных с клавиатуры.
Показать ответ
Ответ:
ник4774
07.07.2020 08:06
Input N ввод кол-ва элементов
For i=1 to N
input A
if A mod 2 =1 then S=S+A
next i
print S
end
0,0
(0 оценок)
Популярные вопросы: Информатика
Nikito23
25.01.2022 10:29
Решите Это инфа 10 класс у меня зачет...
saba22
04.11.2020 15:04
Вычислите выражение записанное в префиксной форме *- + a 3 b с при a=6, b=4 и c=2...
МАШЕНЬКА881
25.01.2022 10:29
Описать: 1. Как производится вставка фрагментов, созданных в других приложениях? 2. Какие форматирования можно применить к этим объектам?...
azovska552
29.09.2020 05:59
в формуле MS Excel cсылка на ячейку имеет вид $D$12,что это означает?...
silonte
01.02.2020 16:32
решить тестирование по информатике...
hhwjsbjweujskzks
24.10.2021 00:47
нарисовать таблицу Пациент и указать в нем все поля, типы данных и первичный ключ. ...
polyaketoztt67
09.07.2021 23:24
Что называют количеством информации. В чем она измеряется? Количеством информации в сообщении....
esken576
21.03.2021 07:46
1)Вывести названия 15% самых дорогих наборов с указанием количества конфет в них 2)Создать запрос выводящий название отдела с наименьшим количеством сотрудников с этими двумя запросами...
milka876
15.01.2020 05:21
Составное высказывание 23- простое число, следовательно оно не делится на 3 и на 5 может быть записано формулой...
xDxzkaketodelat
24.07.2021 21:04
Перевести с языка программирования Turbo Pascal на язык C# uses crt;const nmax=20; var a:array[1..nmax,1..nmax] of integer; m,n,i,j:byte; x:integer; begin writeln( Обмен первой и последней...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
For i=1 to N
input A
if A mod 2 =1 then S=S+A
next i
print S
end