Программа спрашивает сокращенное имя, а выдает полное (например, Саша - Александр) для четырех ваших знакомых. Ввод незнакомого имени должен провоцировать заявление типа: "Я с вами не знаком".      

помогите пожалуйста, задачу надо решить 3 способами 1- постановка задачи 2- запись алгоритма ( блок схема) 3- программа (задача на ветвление) пожалуйста помогите, завтра сдавать а мне еще 7 таких

var name:string;

beginwrite('Введите имя - ');readln(name);if name='Саша' then writeln('Полное имя - Александр') else if name='Дима' then writeln('Полное имя - Дмитрий') else if name='Таня' then write('Полное имя - Татьяна') else if name='Лена' then writeln('Полное имя - Елена') else write('Я с вами не знаком'); end.