Решение задач на языке программирования Turbo Basik

Задание №1
1.1 Постановка задачи
Имеются четыре A, B, C, D произвольных числа. ЭВМ должна ответить на вопрос: Правда ли что числа расположены в возрастающем порядке?
1.2 Блок – схема

Да Нет
Да Нет
Да Нет
1.3 Исходный текст программы
CLS
INPUT "Введите A="; A
INPUT "Введите B="; B
INPUT "Введите C="; C
INPUT "Введите D="; D
k = 0
IF NOT (A < B) THEN k = k + 1
IF NOT (B < C) THEN k = k + 1
IF NOT (C 7) AND (A(I) ^ 2 max THEN max = A(I, J)
NEXT J
PRINT "max("; I; ")="; max
NEXT I
END
5.4 Экранная форма
-2 -2 -5
2 0 7
6 1 -4
5 5 -7
max (1) = -2
max (2) = 7
max (3) = 6
max (4) = 5

Литература
1.Информатика и информационные технологии. Учебное пособие. Под ред. Романовой Ю.Д. (2008, 3-е изд., 592с.)
2.Задачник–практикум по информатике. Под ред. Семакина И.Г.,
Хеннера Е.К. (2001, 189с.)
3.Справочные материалы по программированию на языке Бейсик. Под ред. Житкова О.А., Кудрявцева Е.К. (2002, 3 гл.)
4.Бейсик и Паскаль: от простого к сложному. Под ред. Житкова О.А., Кудрявцева Е.К. (2002, 4 гл.)
5.Информатика. Учебник для вузов. Под ред. Симоновича С.В. (2005, 20 гл.)
6.Информатика. Учебник для вузов. Под ред. Макаровой Н.В. (2005, 18 гл.)
7.Информатика. Учебное пособие для студентов. Под ред. Хеннера Е.К. (2004, 3 гл.)
8.Алгоритмический язык Basic. Пособие для студентов. Под ред. Майера Р.В.
(2005, 124с.)
9.Технология алгоритмического программирования. Пособие для студентов. Под ред. Ефимова О.А., Морозова В.В. (2005, 204с.)
10. Программирование на языке Бейсик. Учебное пособие. Под ред. Петракова А.М., Воройского Ф.С., Макаровой Н.В. (2008, 256с.)

Внимание, отключите Adblock

Вы посетили наш сайт со включенным блокировщиком рекламы!
Ссылка для скачивания станет доступной сразу после отключения Adblock!

Скачать полную версию