
Вопрос задан 26.07.2018 в 19:28.
Предмет Информатика.
Спрашивает Кававин Данил.
Написать программу, которая вводит натуральное число n и считает сумму чисел от 1 до n


Ответы на вопрос

Отвечает Макарова Ангелина.
Var
n:integer;
S:real;
Begin
S:=0;
Write('n = ');
ReadLn(n);
For n:= 1 to n do
S:=S+n;
Write('S = ',S)
End.
n:integer;
S:real;
Begin
S:=0;
Write('n = ');
ReadLn(n);
For n:= 1 to n do
S:=S+n;
Write('S = ',S)
End.



Отвечает Нурик Нурик.
Program sum_n;
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.
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.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Вот пример программы на Python, которая считает сумму чисел от 1 до введенного натурального числа n:
```python n = int(input("Введите натуральное число n: "))
# Проверяем, что число n действительно натуральное if n <= 0: print("Введите натуральное число!") else: # Инициализируем переменную для хранения суммы sum = 0
# Считаем сумму чисел от 1 до n for i in range(1, n+1): sum += i
# Выводим результат print("Сумма чисел от 1 до", n, "равна", sum) ```
Пользователь вводит натуральное число n, программа проверяет его на корректность, затем считает сумму чисел от 1 до n с помощью цикла for и выводит результат.


Топ вопросов за вчера в категории Информатика

Информатика 565

Информатика 25

Информатика 22

Информатика 27

Информатика 34

Информатика 58

Информатика 63

Информатика 23
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili