• Задача: У вас есть доллары. Вы хотите обменять их на рубли. Есть информация стоимости купли-продажи в банках города. В городе N банков. Составьте программу, определяющую, какой банк выбрать, чтобы обменять доллары на рубли наиболее выгодно.
    Язык программирования Паскаль ABC

Ответы 1

  • program p1;const n=5;var i:integer;    kurs: array[1..n] of real;    summa,r,bank: real;begin  writeln('Введите сумму: ');  read(summa);  for i:=1 to n do  begin  writeln('Введите курс в ',i,' банке: ');  read(kurs[i]);  end;    r:=0;  for i:=1 to n do  begin  if (kurs[i]*summa)>r then  begin  r:=kurs[i]*summa;  bank:=i;  end;  end;    writeln('Выгодно в банке №: ',bank);end.
    • Автор:

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

Войти через Google

или

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

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

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