используя любой написать программку для решения задачки. Даны естественные числа от

Используя хоть какой написать программку для решения задачи. Даны естественные числа от 35 до 87. Вывести на экран те из их, которые при дроблении на 7 дают остаток 1,2 и 5. на языке paskal

Задать свой вопрос
2 ответа

или так

begin

   for var i := 35 to 87 do if (i mod 7 = 1) or (i mod 7 = 2) or (i mod 7 = 5) then write(i, ' ');

end.

Program n_1;

var i: integer;

begin

   for i:=35 to 87 do if (i mod 7 = 1) or (i mod 7 = 2) or (i mod 7 = 5) then writeln(i);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт