Задать вопрос
ИнформатикаИнформатика
12 апреля, 03:15

Напишите программу, подсчитывающую сумму всех чисел от 1 до N. Pascal

0
Ответы (1)
  1. 12 апреля, 03:53
    0
    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=10

    s=55
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Напишите программу, подсчитывающую сумму всех чисел от 1 до N. Pascal ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Новые вопросы по информатике
Написать программу, которая выводит на экран результаты следующих действий: 27-5= 11+21= 32/2= 2+2*2= (2+2) * 2= Написать программу, которая выводит на экран результаты следующих действий: 21-4= 21+11= 43/3= 3+3*3= (3+3) * 3=
Ответы (1)
Вариант 2 1. Даны три числа. Найдите сумму второго и третьего числа. Найдите квадрат первого числа. 2. Даны длины сторон прямоугольника. Найдите площадь прямоугольника. 3. Даны длины катетов прямоугольного треугольника. Найдите периметр треугольника.
Ответы (1)
Почему при А=1, В=1, С=1 ответ АVВ равно 1?
Ответы (1)
2. Какое значение будет иметь переменная b после выполнения следующих операторов присваивания: a:=3; b:=a+9; b:=a+b; b:=a-b+b/a. 3.
Ответы (1)
Найдите наиболее точное общее имя каждой группе объектов: з) клавиатура, сканер, мышь
Ответы (1)
Главная » Информатика » Напишите программу, подсчитывающую сумму всех чисел от 1 до N. Pascal
Регистрация Забыл пароль