Пример 1.1.
Простейший алгоритм, запрашивающий имя и затем приветствующий его
обладателя.
Тест
|
Данные
|
Результат |
| Имя = "Тимур" |
"Привет, Тимур!" |
Демонстрация
Школьный АЯ
алг Знакомство (арг лит Имя, рез лит t)
нач
вывод "Как тебя зовут ?"
ввод Имя
t := "Привет, " + Имя + "!" | "+" - операция сцепки
вывод t
кон
Turbo Pascal
Program Hello;
Var Name: String; {Описание переменной Name строкового типа}
BEGIN
Write('Как тебя зовут ? '); {Вывод на экран текста вопроса}
ReadLn(Name); {Ввод c клавиатуры имени}
WriteLn('Привет, ', Name, '!'); {Вывод на экран приветствия}
ReadLn
END.
Здесь последний оператор ReadLn позволяет видеть на экране результаты
работы программы, пока не будет нажата клавиша <Enter>.
Результаты работы Pascal-программы
Как тебя зовут ? Тимур
<Enter>
Привет, Тимур ! |
QBasic
CLS
INPUT "Как тебя зовут ? ", Name$
PRINT "Привет, "; Name$; "!"
END