Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
vinnikdanil
26.05.2023 06:32 •
Информатика
Напишите программу(на паскале), которая вычисляет сумму всех двузначных положительных нечетных чисел.
Ответ:
Мучений
10.08.2020 08:11
Program hhh54;
var i,s: longint;
begin
s:=0;
for i:=10 to 99 do
if i mod 2 <> 0 then s:=s+i;
write (s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
BMW535
21.02.2020 14:39
Подскажите как записать эту формулу в паскаль?...
Avenrop236
26.02.2022 01:47
Расширение программы скажите...
linakovtunenko1
18.11.2020 07:33
Со схемой по технологии буду признателен))...
Ануар22
10.06.2021 10:37
Что тут не верно? писал через телефон на языке python. print( hello world ) s = 0 n = 75 while s + n 150 s = s + 15 n = n - 5 print (n)...
6789234158333
15.03.2020 02:15
Напишите программу, которая в последовательности натуральных чисел определяет сумму трехзначных чисел, оканчивающихся на 7 Программа получает на вход количество чисел в последовательности,...
Vankoed
26.02.2021 09:41
Сообщение, информационный объём которого равен 12 килобайт, занимает 16 страниц. На каждой странице по 32 строки, в каждой из которых записано 64 символа. Сколько символов в алфавите,...
Александра110799
03.07.2021 19:14
На сколько процентов 0.7 часть числа больше его 0.4...
ingab2989
03.07.2021 19:14
Найдите словосочетание со связью . 1) с лёгким сердцем 2) весьма опасен 3) кабинет директора 4) своя игра...
Coolgirl03
03.07.2021 19:14
Иногда старые и молодые лоси близко подходят к шумным .надо найти пары слов,связанных по смыслу....
liza1392
03.07.2021 19:14
Синонімами до слів безлистий, стоїть, гуде, завірюха...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var i,s: longint;
begin
s:=0;
for i:=10 to 99 do
if i mod 2 <> 0 then s:=s+i;
write (s);
end.