7 lines
217 B
ObjectPascal
7 lines
217 B
ObjectPascal
// Условный оператор. Сокращенная форма
|
|
|
|
begin
|
|
var pass := ReadString('Введите пароль:');
|
|
if pass = 'NET' then
|
|
Println('Пароль правильный');
|
|
end. |