1. Информатика
  2. Составить программу

Составить программу вычисления суммы нечётных чисел от 1 до 99.

Савина11 Савина11    2   18.05.2019 17:10    0

Ответы
Николь28071547 Николь28071547  11.06.2020 23:12

var i,s:integer;

begin

   s:=0;

   for i:=1 to 99 do

      if (i mod 2=1) then inc(s,i);

   writeln(s)

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
xachik1998 xachik1998  25.05.2019 09:00
Перевести число 205 из десятичной системы счисления в двоичную, перевести число 1110001 из двоичной системы счисления в десятичную....
yoohbabe yoohbabe  25.05.2019 09:00
1) заполните масив случайными числами от -10 до20 элементов в массиве 10вывести на экран в строку через точку с запятой 2)...
lida105 lida105  23.05.2019 16:10
Гриб, человек, здание, школьник, школа, врач, растение, дерево, яблоня, подосиновик заполните таблицу: запишите для каждого подмножества одно дополнительное свойство. множество...
lili2003love12 lili2003love12  23.05.2019 16:10
Составить программу, которая проверяла бы, не приводит ли суммирование двух целых чисел а и в к переполнению (т.е. к результату большему чем 32 767). если будет переполнение,...
2281337xD 2281337xD  23.05.2019 16:10
Информация представленная в форме пригодной для обработки компьютером...
toguzov2005 toguzov2005  23.05.2019 16:10
П ятикласники віка ,максим,валерія та рома брали участь у навчальному проекті*пісні наших бабусь*.кожен із них знайшов та записав різну кілкість пісень.треба записати послідовність...
tsvirko7891 tsvirko7891  23.05.2019 16:20
Впроцессе преобразования растрового графического изображения количество цветов увеличилось с 16 до 42 949 67 296. во сколько раз увеличился объем, занимаемый им в памяти? с...
TANJASELIK TANJASELIK  23.05.2019 16:20
Написать на паскале начав тренировки лыжник в первый день пробежал 10 км. каждый следующий день он увеличивал пробег на 10% от пробега предыдущего дня. определить пробег лыжника...
Рита496 Рита496  23.05.2019 16:20
Найдите десятичные эквиваленты по их прямым кодом,записанным в 8-разрядном формате со знаком: а)01001100 б)00010101...
stefaniiadr stefaniiadr  23.05.2019 16:20
Как перевести 315 в двоичную систему счисления...

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