Pascal

Материал из Информационная безопасностя
Перейти к навигации Перейти к поиску

Hello World

Объявление переменных

1 var
2   height: integer := 176;
3   loanPercentage: real := 8.9;
4   age: array[1..5] of integer = (3,15,21,7,36);
5   name: string;
6   c: char;
7   busy: boolean;

Ввод и вывод

1 program Test;
2 var
3   age: integer;
4 begin
5   Write('Please enter your age:');
6   Readln(age);
7   Writeln('Age = ' + age);
8 end.