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

Знайти суму всіх натуральних чисел від 1 до n

Ответ:

амон2288

03.10.2020 13:45

Var n,i,s:integer;
begin
write('n = '); readln(n);
s:=0;
for i:=1 to n do s:=s+i;
writeln('s = ',s);
end.

Пример:
n = 5
s = 15

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

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

Ferz686

07.11.2020 01:18

Дан текст из 600 символов. определите информационный объём текста в битах. хелп ! заранее огромное...

igvolume11

07.11.2020 01:18

1. информационное сообщение объёмом 1,5 кбайт содержит 3072 символа. сколько символов содержит алфавит? 2. объём сообщения, содержащего 1024 символа составило 1/512 мегабайта. каков...

lexa23072003

19.04.2023 23:06

Вшкатулке лежит 16 шаров , из них 6 черных ,4 красных , остальные зеленые . из шкатулки извлекли красный шар, пометили и положили обратно в шкатулку . после этого повторно извлекли...

Suzdik23

27.02.2022 08:32

ответьте на 4 вопроса , 20 б....

микс111111

09.03.2023 08:05

1)Имеются два дискретных (знаковых) троичных источника с независимыми элементами. На выходе каждого из источников появляются сообщения одинаковой длины по 10 элементов. Количество...

ДжонниМультяшка

03.04.2021 12:57

1000111111² = a^16 923^10 = a^12 79^16 = a^5 1050^8 = a^12 перевести двоичный код в шеснатиричный код и т.д (желательно с решением, хотя бы пару примеров)...

Мария017

03.04.2021 12:57

По информатике 7 класс . в каком из вариантов обьем информации равен 8 килобайт? а800 байт б12(13)бит в8160байт г2(бит)...

nastya632011

03.04.2021 12:57

По информатике. в школе 100 учеников. из них 14 девочек и42 мальчика. в какой системе счисления посчитаны ученики? а.3 б.5 в7 г6...

swetakorchagov

03.04.2021 12:57

Дан массив из 10 действительных чисел . увеличивающих каждый элемент в 3 раза и вывести печать изменения массива...

User5281

14.02.2023 02:20

Составить программу, заполняющую массив десятью случайными числами и выводящую на экран: 1) максимальное значение; 2)минимальное значение; 3)среднее арифметическое значение....

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

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