По разделам



Задача Proc 10


Описать процедуру Swap(X, Y), меняющую содержимое переменных X и Y (X и Y — вещественные параметры, являющиеся одновременно
входными и выходными). С ее помощью для данных переменных A, B,
C, D последовательно поменять содержимое следующих пар: A и B, C
и D, B и C и вывести новые значения A, B, C, D.

Код (C/C++)

#include <stdio.h>
void  swap(float *x, float *y){
   *x=*x+*y;
    *y=*x-*y;
    *x=*x-*y;
}
 
int main(void)
{
    float a,b,c,d;
    printf("A:");
    scanf("%f", &a);
    printf("B:");
    scanf("%f", &b);
    printf("C:");
    scanf("%f", &c);
    printf("D:");
    scanf("%f", &d);
 
    swap(&a,&b);
    swap(&c,&d);
    swap(&b,&c);
    printf("A:%f; B:%f; C:%f; D:%f;\n",a,b,c,d);
 
    return 0;
}

Код (Python)

import random

def Swap(L):
    L[0],L[1] = L[1],L[0]
    return L

A = random.randrange(-10,10)
B = random.randrange(-10,10)
C = random.randrange(-10,10)
D = random.randrange(-10,10)
print("A = ",A)
print("B = ",B)
print("C = ",C)
print("D = ",D)
print()

A1 = A
B1 = B
C1 = C
D1 = D

A,B = B,A
C,D = D,C
B,C = C,B

print("A = ",A)
print("B = ",B)
print("C = ",C)
print("D = ",D)
print()

L = [A1,B1]
A1,B1 = Swap(L)
L = [C1,D1]
C1,D1 = Swap(L)
L = [B1,C1]
B1,C1 = Swap(L)
print("A = ",A1)
print("B = ",B1)
print("C = ",C1)
print("D = ",D1)
									

Код (Pascal)

program Proc10;
 
procedure Swap(var X,Y:Real);
begin
  X:=X+Y;
  Y:=X-Y;
  X:=X-Y;
end;
 
var
  A,B,C,D:Real;
 
begin
  Write('A :');
  Readln(A);
  Write('B :');
  Readln(B);
  Write('C :');
  Readln(C);
  Write('D :');
  Readln(D);
  Swap(A,B);
  Swap(C,D);
  Swap(B,C);
  Writeln(A,' ',B,' ',C,' ',D);
end.
									




Proc. Абрамян
Proc 1 Просмотров: 13
Proc 2 Просмотров: 14
Proc 3 Просмотров: 12
Proc 4 Просмотров: 12
Proc 5 Просмотров: 14
Proc 6 Просмотров: 10
Proc 7 Просмотров: 12
Proc 8 Просмотров: 13
Proc 9 Просмотров: 12
Proc 10 Просмотров: 10
Proc 11 Просмотров: 14
Proc 12 Просмотров: 10
Proc 13 Просмотров: 12
Proc 14 Просмотров: 13
Proc 15 Просмотров: 13
Proc 16 Просмотров: 11
Proc 17 Просмотров: 22
Proc 18 Просмотров: 13
Proc 19 Просмотров: 14
Proc 20 Просмотров: 9
Proc 21 Просмотров: 12
Proc 22 Просмотров: 12
Proc 23 Просмотров: 11
Proc 24 Просмотров: 12
Proc 25 Просмотров: 9
Proc 26 Просмотров: 11
Proc 27 Просмотров: 14
Proc 28 Просмотров: 18
Proc 29 Просмотров: 21
Proc 30 Просмотров: 25
Proc 31 Просмотров: 13
Proc 32 Просмотров: 12
Proc 33 Просмотров: 9
Proc 34 Просмотров: 17
Proc 35 Просмотров: 9
Proc 36 Просмотров: 11
Proc 37 Просмотров: 12
Proc 38 Просмотров: 10
Proc 39 Просмотров: 13
Proc 40 Просмотров: 9
Proc 41 Просмотров: 13
Proc 42 Просмотров: 11
Proc 43 Просмотров: 12
Proc 44 Просмотров: 12
Proc 45 Просмотров: 14
Proc 46 Просмотров: 10
Proc 47 Просмотров: 9
Proc 48 Просмотров: 14
Proc 49 Просмотров: 10
Proc 50 Просмотров: 12
Proc 51 Просмотров: 18
Proc 52 Просмотров: 11
Proc 53 Просмотров: 13
Proc 54 Просмотров: 11
Proc 55 Просмотров: 13
Proc 56 Просмотров: 10
Proc 57 Просмотров: 11
Proc 58 Просмотров: 11
Proc 59 Просмотров: 8
Proc 60 Просмотров: 11

Комментарии

Чтобы написать комментарии вам нужно войти в систему или зарегистрироваться