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