Все лабораторные работы по паскалю / 1 лаб. Арифметические операции / Prog05

program prog05;
uses crt;
var f,i,o: string[25];
begin
 clrscr;
 write('Введите фамилию : '); readln(f);
 write('Введите Имя : '); readln(i);
 write('Введите Отчество: '); readln(o);
 write('Пользователь - ',f,' ',i,' ',o);
 readln;
end.