• Напишите программу для решения задачи. В видеоигре игрок выигрывает 50 очков, если он сбивает самолет,100 очков, если он сбивает ракету, 200 очков, если он сбивает спутник. Составьте программу, которая выведет на экран число очков игрока, который сбил А самолетов, В ракет и С спутников.То есть,нужно написать программу в PascalABC.Net

    question img

Ответы 5

  • Извините,нужно сделать ответ в более старой версии,к примеру: 3.2,сборка 1417 (28.03.2017)
    • Автор:

      sportyq7t
    • 6 лет назад
    • 0
  • Откуда я это должен знать? Вы не написали - Ваша проблема, запускайте в своей версии и смотрите, если не идет - правьте cтроку с var на "традиционный ввод".
    • Автор:

      shields
    • 6 лет назад
    • 0
  • В общем,спасибо.Подумал сам и вот ,что вышло:program videoigra;var a,b,c:integer;beginwriteln('Самолётов:');readln(a);writeln('Ракет:');readln(b);writeln('Спутников:');readln(c);writeln('Набрано очков:',50*a+100*b+200*c);end.
    • Автор:

      aedan
    • 6 лет назад
    • 0
  • Можно и так
  • // PascalABC.NET 3.3, сборка 1579 от 18.11.2017// Внимание! Если программа не работает, обновите версию!begin  var (a,b,c):=ReadInteger3('Самолетов, ракет, спутников:');  Writeln('Набрано очков: ',50*a+100*b+200*c)end.ПримерСамолетов, ракет, спутников: 20 13 8Набрано очков: 3900
    • Автор:

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

Войти через Google

или

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

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

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