Начало - включить телевизор - пойти на кухню - открыть шкафчик - взять пакетик с попкорном - прочитать инструкцию - поставить попкорн в микроволновку - подождать 3 минуты - достать попкорн - высыпать в чашку - вернуться в комнату - взять пульт - включить фильм - конец
А можно порусски пожалуйста написать
Нужно одновременно нажать клавиши Ctrl+Alt+Del
Var a:string;
begin
readln(a);
if length(a)=1 then a:=a+' ';
if a[2]<>' ' then delete(a,2,1) else writeln('Такого нет');
readln;
<span>end.</span>