Результаты работы Pascal-программы

Тест

Алгоритмы линейной и разветвляющейся структуры

Настройка браузера

При принятии файла нестандартного типа браузер выдает запрос на сохранение файла, с возможностью открытия этого файла, если он имеет зарегистрированное расширение. Поэтому, каждый раз при попытке запуска демонстрации, браузер, получая.tpp или.qbp файл, будет выдавать подобный запрос. Во избежание этого, при первом получении запроса (т.е. при первом нажатии кнопки "Turbo Pascal" демонстрации) следует указать браузеру открыть файл и больше не задавать подобный вопрос, т.е. выставить установки как показано на рис. 2 и нажать "OK" (рассматривается настройка браузера Netscape Navigator 4.0).

Рис. 2

При первом нажатии кнопки "Quick Basic" демонстрации и появлении подобного окна запроса, следует проделать аналогичные действия.

После этого браузер запустит Turbo Pascal или Quick Basic с передачей полученного файла в качестве параметра. При дальнейших нажатиях кнопок демонстрации более никаких запросов выдаваться не будет.

Внимание: все настройти вступят в силу только после перезагрузки компьютера.

Пример 1.1. Простейший алгоритм, запрашивающий имя и затем приветствующий его обладателя.

Данные	Результат
Имя = "Тимур"	"Привет, Тимур!"

Демонстрация

Школьный АЯ

алг Знакомство (арг лит Имя, рез лит t) нач вывод "Как тебя зовут?" ввод Имя t:= "Привет, " + Имя + "!" | "+" - операция сцепки вывод t кон

Turbo Pascal

Program Hello; Var Name: String; {Описание переменной Name строкового типа} BEGIN Write('Как тебя зовут? '); {Вывод на экран текста вопроса} ReadLn(Name); {Ввод c клавиатуры имени} WriteLn('Привет, ', Name, '!'); {Вывод на экран приветствия} ReadLn END.

Здесь последний оператор ReadLn позволяет видеть на экране результаты работы программы, пока не будет нажата клавиша <Enter>.

Как тебя зовут? Тимур <Enter> Привет, Тимур!

QBasic

CLS INPUT "Как тебя зовут? ", Name$ PRINT "Привет , "; Name$; "!" END

Пример 1.2. Определить объём и площадь боковой поверхности цилиндра с заданными радиусом основания R и высотой H.

Дата добавления: 2014-11-08