Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Аня276541
23.01.2021 20:12 •
Информатика
Найти сумму положительных нечетных чисел от 10 до 125. )
Ответ:
кристинка0051
19.07.2020 09:23
Program chisl;
var n,s:integer;
begin
n:=10;
while n<=125 do begin
if n mod 2<>0 then s:=n+s;
n:=n+1;
end;
write(s);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
areskinaelina
11.02.2023 10:52
Написать программу в с++.условие: выводить на экран удвоенное значение четных чисел,значения нечётных чисел выводить без изменений ....
юлия1384
11.02.2023 10:52
По информатике за 7 класс. скорость передачи данных по некоторому каналу связи равна 24 мбит/с. передача файла через это соединение заняла 10 секунд. определите информационный объём...
d2e0n0i5s
04.06.2022 20:53
Установите соответствие. 1. floppy disk. 1. оптический диск a. 160 гбайт 2.compact disk 2. гибкий магнитный диск b. 700 мбайт 3. hard disk 3. dvd c. 1,44 мбайт 4. digital 4. жёсткий...
Abdul18
24.03.2021 12:57
А=7 b: =7+9*a a=b÷5*a определите значение переменной а после иисполнения алгоритма...
паша535
21.02.2021 09:58
в каком преложении можно зоздать игру?...
IVIOPGAN
09.11.2022 01:45
Почему в европе так поздно узнали о технологии изготовления бумаги?...
ksyu5551
09.11.2022 01:45
Информационное сообщение объёмом 3 кбайт содержит 6144 символа. сколько символов содержит алфавит , при которого было записано это сообщение?...
тай4
06.01.2023 05:29
Имеется книга в 290 страниц,на странице 39 строк по 67 слов.можно ли разместить ее на дискете объемом 1,44 мбайт?...
INNADANILOVA
06.12.2021 02:15
с информатикой, задание ниже во вложении...
cocosobanro
12.01.2020 20:38
Запишите на языке паскаль оператор вывода переменной х вещественного типа с округлением до тысячных...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var n,s:integer;
begin
n:=10;
while n<=125 do begin
if n mod 2<>0 then s:=n+s;
n:=n+1;
end;
write(s);
readln;
end.