• Написать программу по Паскале. Вычислить сумму чисел от 19 до 51, если они делятся на 5.

Ответы 1

  • 1-й вариант: Pascal (for) var sum : integer; i: integer;begin sum := 0; i := 0; for i:=19 to 51 do begin if i mod 5 = 0 then sum := sum + i; end; writeln(sum);end.2-й вариант:Pascal var sum : integer; i: integer;begin sum := 0; i := 19; while (i <= 51) do begin if i mod 5 = 0 then sum := sum + i; i := i + 1; end; writeln(sum);end.
    • Автор:

      hunter86
    • 5 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years