филосов00
01.10.2020 23:14

27) (А. Куканова) Рассматривается множество целых чисел, принадлежащих числовому отрезку (3712; 8432), которые удовлетворяют следующим условиям:
- запись в двоичной и четверичной системах счисления заканчивается одинаковой цифрой;
- кратны 13, 14 или 15.
Найдите количество таких чисел и минимальное из них.

написать программу на паскаль

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
gghggggg1
23.11.2020 13:24

program kol;

var k, n, min:integer;

begin

  k:=0; min:=8433;

  for n:= 3712 to 8432 do

    if (n mod 2= n mod 4) and (n mod 13=0) and (n mod 14=0) and (n mod 15=0) then

      begin

        if min>n then

        min:=n;

        k:=k+1;

      end;

      Writeln (k,' ',min);

End.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота