По разделам



Задача If 18


Даны три целых числа, одно из которых отлично от двух других, равных между собой. Определить порядковый номер числа, отличного от
остальных.

Код (C/C++)

#include <stdio.h>

int main(void)
{
   int a1, a2, a3;
   printf("1:");
   scanf ("%i", &a1);
   printf("2:");
   scanf ("%i", &a2);
   printf("3:");
   scanf ("%i", &a3);

   if (a2==a3)  printf("%i\n",1);
   else if (a1==a3) printf("%i\n",2);
   else printf("%i\n",3);

   return 0;
}

Код (Python)

import random

def RandNum():
    l = []    
    x1,x2 = random.sample(range(-10, 10), 2)
    N = random.randrange(1,4)
    if N == 1:
        l.append(x1)
        l.append(x1)
        l.append(x2)
    elif N == 2:
        l.append(x1)
        l.append(x2)
        l.append(x2)
    else:
        l.append(x2)
        l.append(x1)
        l.append(x2)
    return l
        
A,B,C = RandNum()

print("Число A:", A)
print("Число B:", B)
print("Число C:", C)

if A == B:
    print("C")
elif A == C:
    print("B")
else:
    print("A")
									

Код (Pascal)

program if18;
var
  A, B, C: Real;
begin
  Write('Введите первое число: ');
  Readln (A);

  Write('Введите второе число: ');
  Readln (B);

  Write('Введите третье число: ');
  Readln (C);

  if B=C then Writeln('1');
  if A=C then Writeln('2');
  if A=B then Writeln('3');
end.
									




If. Абрамян
If 1 Просмотров: 12
If 2 Просмотров: 14
If 3 Просмотров: 11
If 4 Просмотров: 14
If 5 Просмотров: 12
If 6 Просмотров: 14
If 7 Просмотров: 13
If 8 Просмотров: 17
If 9 Просмотров: 12
If 10 Просмотров: 17
If 11 Просмотров: 24
If 12 Просмотров: 20
If 13 Просмотров: 25
If 14 Просмотров: 15
If 15 Просмотров: 22
If 16 Просмотров: 12
If 17 Просмотров: 12
If 18 Просмотров: 11
If 19 Просмотров: 8
If 20 Просмотров: 7
If 21 Просмотров: 11
If 22 Просмотров: 11
If 23 Просмотров: 13
If 24 Просмотров: 14
If 25 Просмотров: 11
If 26 Просмотров: 11
If 27 Просмотров: 12
If 28 Просмотров: 16
If 29 Просмотров: 15
If 30 Просмотров: 10

Комментарии

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