Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Все лабораторные работы по паскалю / 1 лаб. Арифметические операции / Prog05
.pas 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.
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.
Соседние файлы в папке 1 лаб. Арифметические операции