Составить программу,которая выводит ** экран фамилию и инициалы,введенные с клавиатуры

Question

Составить программу,которая выводит на экран фамилию и инициалы,введенные с клавиатуры

Comments

Язык?

---

В Pascal

---

То есть мы вводим Фамилию И О а программа их обратно выводит?

---

Мы вводим с клавиатуры фамилию,имя и отчество (полностью),а программа выводит на экран фамилию и инициалы

---

Ок, понял

Answer 1

Var F, i, o:string[50];
begin
readln(F);
readln(i);
readln(o);
write(F, ' ', i[1], '. ', o[1], '. ');
end.