Задать вопрос
ИнформатикаИнформатика
2 сентября, 20:50

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

+2
Ответы (1)
  1. 2 сентября, 22: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 ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы
Помоги с ответом
Задачи на тригонометрию. 10 - 11 класс. 1) В треугольнике ABC угол C прямой. Известно, что BC = 8√3 и AC = 8. Найдите cos А. 2) В прямоугольном треугольнике ABC с прямым углом С, ВС = 3√17 и tg A = 4. Найдите АВ.
Нет ответа
Найдите пересечения и обьединение б) множеств букв, используемых в записи слов "геометрия" и "география"
Нет ответа
Из басни Дмитриева муха выписать олицетворение эпитеты сравнения ...
Нет ответа
Найти периметр ромба авсд с известным углом 60 градусов и стороной ас равной 20 см
Нет ответа
Составить 15 предложений про семью на английском, время Present Simple
Нет ответа
Главная » Информатика » Напишите программу, подсчитывающую сумму всех чисел от 1 до N. Pascal
Регистрация Забыл пароль