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

  • 1) Напишите линейную программу,в результате выполнения которой целочисленные переменные x и y обменяются значениями. При этом нельзя использовать дополнительные переменные . Найдя такой алгоритм,определите,в чем его недостаток по сравнению с методом обмена через третью переменную. Можно ли его применять для вещественных чисел? (Паскаль)
    2) Напишите оператор присваивания, в результате выполнения которого, целочисленной переменной h присвоится значение цифры, стоящей в разряде сотен в записи положительного целого числа k( например, если k= 28 796, то h= 7).

Ответы 1

  • 1)var x,y:real;begin  x:=random(1,100);  y:=random(1,100);  writeln('Ввели: x=',x,' y=',y);  x:=x+y;  y:=x-y;  x:=x-y;  writeln('Поменяли: x=',x,' y=',y);end.2)var h,k:integer;begin  k:=random(10000,99999);  writeln('Ввели: k=',k);  h:=(k mod 1000) div 100;  writeln('h=',h);end.

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

Еще вопросы

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

Войти через Google

 или

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

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

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