Света Ерёмина
Вводится строка 'фамилия имя отчество'.Вывести на экран строку 'фамилия и. о. 'Сделайте программу в паскале
Вывести на экран строку 'фамилия и. о. '
Сделайте программу в паскале
Вывести на экран строку 'фамилия и. о. '
Сделайте программу в паскале
var
fam,name,otch:string;
begin
write('Введите фамилию -> ');
readln(fam);
write('Введите имя -> ');
readln(name);
write('Введите отчество -> ');
readln(otch);
writeln('Ваше Фамилия И. О. = ',fam,' ',name[1],'.',otch[1],'.');
readln;
end.