alekssamos/TEST.BAS

## TEST.BAS
CLS

locate  1, 30 : PRINT "Тест про компьютеры."
10 locate  2, 20 : PRINT "Начать? 1 да, 0 нет"
INPUT "", x
IF x = 0 THEN : END
IF x <> 1 THEN : GOTO 10
y = 0
PRINT "При ответе используйте соответствующую варианту цифру"
PRINT "без лишних символов и знаков"
PRINT

Color 1 : PRINT "#1. Какое устройство является основой компьютера?"
Color 2 : PRINT "  1 )   мышь"
Color 2 : PRINT "  2 )   оперативная память"
Color 2 : PRINT "  3 )   материнская плата"
INPUT "Ответ: ", a
IF a = 3 THEN : y = y + 1
PRINT

Color 5 : PRINT "#2. Для чего предназначен монитор?"
Color 4 : PRINT "  1 )   для ввода визуальной информации"
Color 1 : PRINT "  2 )   для форматирования текста"
Color 1 : PRINT "  3 )   для вывода визуальной информации"
INPUT "Ответ: ", a
IF a = 3 THEN : y = y + 1
PRINT

Color 9 : PRINT "#3. Процессор - это ..?"
Color 10 : PRINT "  1 )   'мозг' компьютера, он выполняет обработку информации"
Color 10 : PRINT "  2 )   'память' компьютера, хранит всю информацию на компьютере"
Color 10 : PRINT "  3 )   устройство для ввода алфавитно-цифровой информации"
INPUT "Ответ: ", a
IF a = 1 THEN : y = y + 1
PRINT

Color 12 : PRINT "#4. Винчестер служит для?"
Color 13 : PRINT "  1 )   для обработки информации"
Color 13 : PRINT "  2 )   для долговременного хранения больших объёмов информации"
Color 13 : PRINT "  3 )   для хранения информации только во время работы компьютера"
INPUT "Ответ: ", a
IF a = 2 THEN : y = y + 1
PRINT

Color 15 : PRINT "#5. Какое устройство специально предназначено для обработки графической информации перед выводом на экран (особенно оно важно для игр)?"
Color 16 : PRINT "  1 )   монитор"
Color 16 : PRINT "  2 )   видеокарта"
Color 16 : PRINT "  3 )   графический редактор"
INPUT "Ответ: ", a
IF a = 2 THEN : y = y + 1
PRINT

Beep
Color 4, 15 : PRINT "                    Тест завершен!           Ваша оценка: "; y; "."
Beep

Rem PRINT "С Вами был Леха из 12 класса. Пока."
	CLS

	locate 1, 30 : PRINT "Тест про компьютеры."
	10 locate 2, 20 : PRINT "Начать? 1 да, 0 нет"
	INPUT "", x
	IF x = 0 THEN : END
	IF x <> 1 THEN : GOTO 10
	y = 0
	PRINT "При ответе используйте соответствующую варианту цифру"
	PRINT "без лишних символов и знаков"
	PRINT

	Color 1 : PRINT "#1. Какое устройство является основой компьютера?"
	Color 2 : PRINT " 1 ) мышь"
	Color 2 : PRINT " 2 ) оперативная память"
	Color 2 : PRINT " 3 ) материнская плата"
	INPUT "Ответ: ", a
	IF a = 3 THEN : y = y + 1
	PRINT

	Color 5 : PRINT "#2. Для чего предназначен монитор?"
	Color 4 : PRINT " 1 ) для ввода визуальной информации"
	Color 1 : PRINT " 2 ) для форматирования текста"
	Color 1 : PRINT " 3 ) для вывода визуальной информации"
	INPUT "Ответ: ", a
	IF a = 3 THEN : y = y + 1
	PRINT

	Color 9 : PRINT "#3. Процессор - это ..?"
	Color 10 : PRINT " 1 ) 'мозг' компьютера, он выполняет обработку информации"
	Color 10 : PRINT " 2 ) 'память' компьютера, хранит всю информацию на компьютере"
	Color 10 : PRINT " 3 ) устройство для ввода алфавитно-цифровой информации"
	INPUT "Ответ: ", a
	IF a = 1 THEN : y = y + 1
	PRINT

	Color 12 : PRINT "#4. Винчестер служит для?"
	Color 13 : PRINT " 1 ) для обработки информации"
	Color 13 : PRINT " 2 ) для долговременного хранения больших объёмов информации"
	Color 13 : PRINT " 3 ) для хранения информации только во время работы компьютера"
	INPUT "Ответ: ", a
	IF a = 2 THEN : y = y + 1
	PRINT

	Color 15 : PRINT "#5. Какое устройство специально предназначено для обработки графической информации перед выводом на экран (особенно оно важно для игр)?"
	Color 16 : PRINT " 1 ) монитор"
	Color 16 : PRINT " 2 ) видеокарта"
	Color 16 : PRINT " 3 ) графический редактор"
	INPUT "Ответ: ", a
	IF a = 2 THEN : y = y + 1
	PRINT

	Beep
	Color 4, 15 : PRINT " Тест завершен! Ваша оценка: "; y; "."
	Beep

	Rem PRINT "С Вами был Леха из 12 класса. Пока."