Задать вопрос Регистрация
Помочь другим

  • ЛЮДИ! ПОМОГИТЕ РЕШИТЬ ПОЖАЛУЙСТА В ПРОГРАММЕ ПАСКАЛЬ!

    question img

Ответы 2

  • Спасибо!

    • Автор:

      naomia3mk
    • 4 года назад
    • 0
  • //прога на Pascal`evari, n: byte;sum, a : longint;beginread (n);  for i:=1 to n do  begin  read (a);     if a mod 7 = 0 then inc (sum, a);  end;write (sum);end.

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

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

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

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