1. Информатика
  2. Найдите сумму нечетных

Найдите сумму нечетных чисел от а до 100, а вводится с клавиатуры (Pascal ABC) ​

Пупырка521 Пупырка521    1   30.04.2020 06:51    0

Ответы
DIMjoykin DIMjoykin  14.10.2020 03:57

program aaa;

type iint = 1..100;

var a: iint;

    i, s:integer;

begin

readln(a);

s:=0;

for i:=a to 100 do

if odd(i)  then

 s:=s+i;

writeln(s)

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
NEO178 NEO178  13.08.2019 23:00
Какие комбинации надо сделать в компьютере. например: я не смотрю какой у меня сейчас стоит язык и я пишу в поисковике на , хоть должен на . какие комбинации клавиш в...
135Солнышко135 135Солнышко135  13.08.2019 23:00
в каких профессиях и как компьютер...
People11111 People11111  09.07.2019 16:10
После выполнения команды присваивания b: =b+a значение переменной a равно 7, а значение переменной b равно 5. чему были равны значения переменных a и b до выполнения...
Аманда55573 Аманда55573  11.02.2022 07:45
1 як називається персонаж в середовищі Скретч на с 6 букв 2 яка назва рудого кота в середовищі скретч 3 хто такий рижий кіт в середовищі скретч...
morozovasanya morozovasanya  11.02.2022 07:45
Вычисли и соотнеси результат...
Аделя0504 Аделя0504  18.03.2019 20:47
Определите значение переменной b после выполнения фрагмента алгоритма....
lananana2006 lananana2006  25.02.2021 15:32
Нужна блок-схема по задаче Вычислить у=sin(x), используя в качестве аргумента меньшее из двух чисел....
Вольха97 Вольха97  15.05.2020 06:37
Как называли Кайроша на русском языке СКАЖИТЕ...
MaksimSulteev MaksimSulteev  15.05.2020 06:37
Огромные водные окружающие участки суши, - этоа) материкиб) океаны,в) реки,г) страны СКАЖИТЕ ПРАВИЛЬНЫЙ ОТВЕТ ЭТО ВО ИЗ КОНТРОЛЬНОЙ​...
HYPE111 HYPE111  15.05.2020 06:37
При каких действиях над целыми числами всегда получается целое число? А) сложениеБ) вычитаниеВ) умножениеГ) делениеД) деление на противоположное число​...

Популярные вопросы