• программа для нахождении суммы всех чисел кратных 3 но не кратных 5

Ответы 1

  • // Pascal ABC.NETvar    sum : integer;    i : integer;    begin    for i := 10 to 99 do        if (i mod 3 = 0) and (i mod 5 <> 0) then            sum += i;    writeln('Summa is ', sum);end.
  • Добавить свой ответ

Войти через Google

или

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

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

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