AlexGood46
Опубликовано 6 лет назад по предмету Информатика от AlexGood46


Помогите пожалуйста с домашней работой. Напишите программу, которая вычисляет сумму: а) первых n натуральных чисел; Решение тремя способами(while, repeat,for.)

  1. Ответ
    Ответ дан p10ne
    function getSumFor(n:integer):integer;var sum, i:integer;begin  sum := 0;  for i:=1 to n do   begin    sum := sum + i;  end;  result := sum;end;function getSumWhile(n:integer):integer;var sum, i:integer;begin  sum := 0;  i := 1;  while i <= n do  begin    sum := sum + i;    i := i + 1;  end;  result := sum;end;function getSumRepeat(n:integer):integer;var sum, i:integer;begin  i := 1;  sum := 0;  repeat    sum := sum + i;    i := i + 1;  until i > n;  result := sum;end;begin  writeln(getSumFor(1));  writeln(getSumWhile(1));  writeln(getSumRepeat(1));end.
Не тот ответ, который вам нужен?
Найди нужный
Самые новые вопросы
99335871
Другие предметы - 10 месяцев назад

В какой оболочке земли живёт большинство живых организмов?

99335871
Другие предметы - 10 месяцев назад

Из каких неживых частей состоит экосистема

mandrykin
Другие предметы - 10 месяцев назад

На какие расы делятся население земли

kinda2007
Другие предметы - 10 месяцев назад

Определение статуса военнослужащего (краткий ответ!!)

Санёк1999
Другие предметы - 10 месяцев назад

Проведи следущие наблюдения в классе: один учащийся спокойно сидит за партой, слушая объяснения учителя; второй записывает план объяснения в тетради ; третий ученик вышел к доске отвечать на вопрос учителя. назови движущиеся тела. относительно каких других тел они движутся ?

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.

Задай вопрос

Лучшие за месяц


Интересные статьи:


Пошаговый план подготовки к ЕГЭ за полгода для школьников
Не сдал ЕГЭ пересдача апелляция альтернативные пути
10 ошибок на ЕГЭ по русскому и способы их избежать
Выбор предметов ЕГЭ для поступления
Секреты подготовки к экзаменам дома от отличников