СРОЧНО!В паскале) помогите пожалуйста) Надо ввести имя фамилию и отчество с клавиатуры затем сделать так чтобы программа вывела отдельно в строчку фамилию отдельно имя и отдельно отчество, а потом ещё и инициалы ОЧЕНЬ НАДО)
Program Nadya18081998;
const n=20;
var
f,i,o,ns:string;
begin
write(Введите фамилию );
readln(f);
write(Введите имя );
readln(i);
write(Введите отчество );
readln(o);
writeln(**********************************);
writeln( Фамилия: ,f);
writeln( Имя: ,i);
writeln(Отчество: ,o);
writeln(Инициалы: ,Copy(i,1,1)+Copy(o,1,1));
writeln(**********************************);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
