Просмотр одиночного сообщения
Old 26-02-2021, 23:25   #3623
Димыч
Banned
 
Сообщений: 3,663
Проживание:
Регистрация: 26-07-2015
Status: Offline
Цитата:
Сообщение от VarlogMD
while (triggered) {

drink Karhu;

if (!triggered) break;

}

stay calm;


var mood, action, weather : string;
begin
case (mood) of
'full of energy' : if (weather='fine') then action:='go to ski' else action:='programming';
'tired' : action:='sleep';
'sad and bad' : action:='drink';
'drunk' : action:='read a russian.fi';
else
repeat
drink;
until (mood='drunk')
end;
end;
 
0
 
0
    Ответить с цитированием