Войти Регистрация Спроси ai-bota

Найти сумму n первых натуральных чисел паскаль

Ответ:

larionxam

06.07.2020 16:34

Var n,s,a:integer;
begin
readln(n);
for n:=n downto 1 do begin
read(a);
s+=a;
end;
writeln(s);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

upsbeats

07.05.2023 21:09

Составить иерархическую структуру на любую тему( всего 6 папок, 10 различных файлов К двум из них сделать путь....

мандаринка20071

09.09.2020 18:32

Вспомните басни. какие черты характера людей и отношения между людьми смоделированы в них?...

GreatGenius

09.09.2020 18:32

Водной из кодировок unicode каждый символ кодируется 16 битами. определите информационный объем следующего предложения в данной кодировке. я памятник себе воздвиг нерукотворный....

musulmanka95

29.01.2022 17:13

Вводится последовательность точек на координатной плоскости, ((0,0) признак конца последовательности). Траектория блуждания точки из (1,0). Определить сколько полных оборотов...

мавштдэкычп

15.10.2020 20:51

№309. голосование напишите функцию голосования function election (x, y, z: boolean): boolean входные данные вводится 3 числа - x, y и z (x, y и z равны 0 или 1, 0 соответствует...

Vasilisa5111

15.10.2020 20:51

Умняшки! даны три числа. все неотрицательные числа увеличить в 3 раза. составить алгоритм с блок схемы....

tanakovalizka1

12.05.2021 03:49

Что такое в информатике цикл ?...

fajzullaevamar

28.04.2020 06:24

Вычислите значение переменной для данных команд присваивания. B:=2291 div 10-12 b= X:=1759 mod 10+11 x= N:5363 div100 n= F:=(56480 div 1000) mod 10 f=...

nikgolubev2000

03.09.2021 04:38

Дан фрагмент электронной таблицы Назовите результаты вычислений По формулам...

yana4ka3

06.10.2020 10:42

Как нарисовать ромашку в paint...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку