Безотлагательно !! Найдите творенье двухзначных нечетных чисел, делящихся на 13. Нужно

Безотлагательно !! Найдите произведение двухзначных нечетных чисел, делящихся на 13. Необходимо воплотить в c

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

program sd;

var i : integer;

   s : longint;

begin

s := 1;

i := 10;

repeat

   if (i mod 13 = 0) and (i mod 2 lt;gt; 0) then

      s := s * i;

i:= i+1;

until igt;99;

writeln('proizvedenie = ',s);

end.

Анна Саврико
Значения принять от юзера!
Ангелина Зудлова
Это Паскаль, а не C
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт