Форум программистов, компьютерный форум, киберфорум
QBasic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
Virtue
0 / 0 / 0
Регистрация: 09.12.2010
Сообщений: 17
1

Для каждой проведенной игры напечатать словесный результат: "выигрыш", "проигрыш" или "ничья"

16.12.2010, 13:19. Просмотров 1169. Ответов 2
Метки нет (Все метки)

Даны два массива из n, однозначных чисел. В первом из них записано кол-во мячей, забитых футбольной командой в игре, во втором - кол-во пропущенных мячей в этой же игре.
а) Для ккаждой проведенной игры напечатать словесный результат: "выйгрыш", "пройгрыш" или "ничья".
б) Определить кол-во пройгрышей, выйгрышей и ничьих данной команды.
в) Подсчитать общее кол-во очков, набранных командой (за выйгрышь дается 3 очка, за ничью - 1, за пройгрышь - 0)
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
16.12.2010, 13:19
Ответы с готовыми решениями:

Написать программу, реализующую операции ("+","-","*","\",) c комплексными числами
pulkar zombax Написать программу,реализующую операции ("+","-","*","\",)c комплексными...

Написать программу,реализующую операции("+","-","*","/") с комплексными числами
Привет!Нужна помощь! Написать программу,реализующую операции("+","-","*","/") с комплексными...

Составить программу, которая будет определять правильное написание приставки "без" или "бес"
Составить программу, которая будет определять правильное написание приставки "без" или "бес" (рус....

Напишите программу которая будет в зависимости от чисел N и K выводить "YES" или "NO"
1) На кассе в супермаркете новая услуга: если вы приобрели покупки, вес которых превышает...

2
Jjohn
16.12.2010, 14:12 2
Лучший ответ Сообщение было отмечено Virtue как решение

Решение

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
CLS
n = 10
DIM a(n), b(n)
RANDOMIZE TIMER
FOR i = 0 TO n
  a(i) = INT(RND * 4)
  b(i) = INT(RND * 4)
NEXT
 
FOR t = 0 TO n
  PRINT a(t); ":"; b(t),
  IF a(t) > b(t) THEN
    PRINT "win"
    w = w + 1
  ELSEIF a(t) = b(t) THEN
    PRINT "draw"
    n = n + 1
  ELSE
    PRINT "lose"
    l = l + 1
  END IF
NEXT
 
PRINT "wins="; w, "draws="; n, "loses="; l
PRINT "score="; w * 3 + n
Как-то так!
Virtue
0 / 0 / 0
Регистрация: 09.12.2010
Сообщений: 17
16.12.2010, 16:08  [ТС] 3
спасибо большое
0
16.12.2010, 16:08
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
16.12.2010, 16:08

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Определить количество ключевых слов "While", "FOR", "Input"
Ввести текст бейсик-программы(10-15 строк). Определить количество ключевых слов "While", "FOR",...

Составить программу для замены в тексте слога "ма" на слог "па" / QBasic (Бейсик)
Помогите пожалуйста!!!! Составить программу для замены в тексте слога "ма" на слог "па"

Занести произвольные данные в одномерный массив и заменить все слова начинающиеся на "а" на символ "0"
Занести произвольные данные в одномерный массив и заменить все слова начинающиеся на "а" на символ...

Дан массив с символьными элементами. Заменить все элементы "К" на элемент "C" и подсчитать их количество
REM К na С INPUT "vvedite kol-vo strok massiva"; N INPUT "vvedite kol-vo stolbcov massiva" M DIM...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.