Составить программу нахождения суммы целых чисел из промежутка ab. язык pascal !

допустим, что a и b входят в этот промежуток.

 

program test; var a, b, sum, i: integer; begin    write('enter two integers: ');     readln(a, b);     sum: =0;     for i: =a to b do    sum: =sum+i;     write('sum = ', sum);     readln; end.

Современное программное обеспечение -

это рынок широких возможностей и

жесткой конкуренции. Отечественные и

зарубежные компании вкладывают все свои

интеллектуальные ресурсы в создание новых

востребованных продуктов.

Персональный компьютер, смартфон,

планшет, навигатор - все эти устройства

используются человеком повседневно

и повсеместно. Главная задача техники

данного типа - получение, обработка и

передача информации любого типа.

Мир цифровых технологий позволяет

нам пользоваться такими услугами, как

общение на большом расстоянии, обмен

фото- и видеосообщениями, текстовыми

и другими файлами. Все это возможно

благодаря инновационным устройствам,

так называемым гаджетам, которые прочно

укоренились в нашем быте.

Однако само по себе устройство связи не

может выполнять всех тех функций, которые

были перечислены выше. Для полноценного

функционирования компьютера или любого

другого устройства нужно современное

программное обеспечение.

Программа является ничем иным, как

подробным и последовательным набором

команд, которые выполняет гаджет. Именно

благодаря специальным программам любой

ПК можно превратить в инструмент для

сложных бухгалтерских расчетов, плацдарм

для героических игр, персональную

записную книжку или многофункциональную

базу данных.

Program llllll; var a: array [0..10] of integer; n, i, b : integer; begin       writeln('введите количество чисел');       readln(n);       b: =0;       for i : = 1 to n do               a[i] : = random(10);       b: =0;       for i : = 1 to n do       begin               if a[i] mod 2 = 0 then                       b: =b+a[i];       end;       writeln('это сумма ' , b);       writeln(a); end.