• I В паскале с помощью генератора случайных чисел получить двузначное число и
    1) найти и вывести сумму его цифр
    2) сформировать число, в котором поменяются разряды (допустим будет число 13, нужно сделать, что бы было 31 и т.п.)
    II В паскале с помощью генератора случайных чисел получить трехзначное число и определить, является ли оно полимером (например 121 - является, 123 - нет)

Ответы 1

  • program p1;var a:integer;begina:=random(89)+10;writeln('a= ',a);writeln('Summa tsifr= ',a mod 10+a div 10);writeln('4islo naoborot= ',a mod 10, a div 10);end.program p2;var a:integer;begina:=random(899)+100;writeln('a= ',a);if (a mod 10)=((a div 100) mod 10) then writeln('POLIMER') else writeln('NE POLIMER');end.
    • Автор:

      pollyae6u
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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