1. Информатика
  2. Напишите программу в паскале:

Напишите программу в паскале: Вводится 15 чисел. Найти сумму чисел, введенных с пятого по десятое

linakabak12345 linakabak12345    1   17.03.2020 13:06    1

Ответы
denislabynsky denislabynsky  12.10.2020 00:00

var

s: real;

n: integer;

begin

writeln('Введите последнее число множества');

readln(n);

s:=(n*(n+1))/2;

writeln('Сумма чисел равна ',s);

end.

ПОКАЗАТЬ ОТВЕТЫ
KatyshaBym KatyshaBym  12.10.2020 00:00

PascalABC.NET

begin

 ReadArrInteger(15)[4:9].Sum.Println;

end.

Объяснение:

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Люба011 Люба011  17.10.2019 11:25
Задано число n. требуется найти число от 1 до n, включительно, которое имеет максимальное число положительных целых делителей. например, если n = 20 то искомое число...
lilia25021 lilia25021  17.10.2019 11:23
На этой неделе на уроках информатики васе рассказывают про строки. вчера вася узнал, что такое циклический сдвиг: k-й циклический сдвиг строки – это строка, полученная...
volkovaolga75 volkovaolga75  17.10.2019 11:22
даны три стороны одного и три стороны другого треугольника. эти треугольники равновеликие, т.е. имеют равные площади. решить в системе c#...
tata15711 tata15711  17.10.2019 11:22
Жила-была девочка катя, и было у неё много-много денег. и подруг. ну как и собрались они как-то раз все вместе у кати дома и обсуждали фильмы. многие хвалили вкус...
Улька9Пулька Улька9Пулька  17.10.2019 11:22
Нужно написать программу к этой . дачу охраняют 4 собаки. 3 собаки отгоняли по 7 грабителей каждую ночь, а одна собака отгоняла 2 грабителя в ночь. сколько грабителей...
superrobbot2000 superrobbot2000  17.10.2019 11:20
Написать программу для вычисления функции согласно вариантам (надо решить 4) на фри паскале...
f79gkr4st f79gkr4st  09.03.2019 11:40
Оформите в виде блок схемы алгоритм приготоления каши из топора по мотивам народной сказки: 1)начало 2) 3) 4) 5) 6) 7) 8)конец...
81920346 81920346  19.09.2019 09:00
Определите значение переменной y после выполнения следующего фрагмента программы: x: =25; y: =-20; while x*y 0 do begin x: =x-5; y: =y+2 end;...
ProPython ProPython  19.09.2019 09:00
День программиста отмечается в 255-й день года (при этом 1 января считается нулевым днем). требуется написать программу, которая определит дату (месяц и число григорианского...
Head5 Head5  19.09.2019 09:00
Запиши число 191 в десятичной 16 системе счисления...

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