Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
87781891293
0 / 0 / 0
Регистрация: 28.02.2013
Сообщений: 40
#1

Напечатать вместо имени и отчества инициалы - Pascal ABC

07.03.2013, 09:45. Просмотров 1082. Ответов 2
Метки нет (Все метки)

2. Заданы фамилия, имя и отчество учащегося, разделенные пробелами. Напишите программу, печатающую фамилию ученика и его инициалы.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
07.03.2013, 09:45
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Напечатать вместо имени и отчества инициалы (Pascal ABC):

Описать процедуру, которая печатает фамилию и инициалы вместо имя и отчества - Pascal
Заданы фамилия, имя, отчество учащегося, разделенного пробелами. Описать процедуру, которая печатает его фамилию и инициалы.

Записи: ввести информацию о студентах и напечатать фамилии и инициалы всех студенток второго курса - Pascal
Имеется следующая информация о каждом из n студентов: <фамилия>, <имя>, <отчество>, <пол>, <возраст>, <курс>. Написать программу, которая...

Распечатайте все отчества по алфавиту - Pascal
Помогите доработать Пусть текст предстовляет собой последовательность строк. На каждой строке находится имя, фамилия и отчество....

Определите, есть ли в списке однофамильцы и выведите на экран их имена и отчества - Pascal ABC
Напишите программу, которая заполняет с клавиатуры массив 3 на 5 фамилиями, именами и отчествами(фамилии в первой строке, имена во второй,...

Вывести фамилии, имена и отчества мастеров с высшим образованием и вычислить их средний стаж. - Pascal
В анкетах сотрудников некоторого учреждения имеются следующие сведения: фамилия, имя, отчество, год рождения, должность (мастер, инженер,...

Распечатайте все отчества по алфавиту, а также текст, содержащий строки, состоящий только из фамилий и имён - Pascal ABC
Пусть текст представляет собой последовательность строк. На каждой строке находится имя, фамилия и отчество. Распечатайте все отчества по...

2
CodeR
Фрилансер
3376 / 2778 / 788
Регистрация: 08.02.2012
Сообщений: 6,355
Записей в блоге: 1
07.03.2013, 10:12 #2
Pascal
1
2
3
4
5
6
7
8
9
Var s,s1:string;
Begin
    write('Введите Фамилия Имя Отчество: ');readln(s);
    s1:=s1+Copy(s,1,Pos(' ',s)-1)+' '+s[Pos(' ',s)+1]+'.';
    Delete(s,1,Pos(' ',s));Delete(s,1,Pos(' ',s));
    s1:=s1+s[1];
    writeln('Ф.И.О: ',s1);
    readln;
End.
0
Puporev
Модератор
52991 / 40802 / 14050
Регистрация: 18.05.2008
Сообщений: 94,888
07.03.2013, 10:30 #3
Pascal
1
2
3
4
5
6
7
8
9
10
11
uses crt;
var s,s1:string;
begin
writeln('Введите Фамилию Имя Отчество');
read(s);
s1:=copy(s,1,pos(' ',s)+1);
delete(s,1,pos(' ',s)+1);
delete(s,1,pos(' ',s));
s1:=s1+'. '+s[1]+'.';
write(s1);
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
07.03.2013, 10:30
Привет! Вот еще темы с ответами:

Вывести фамилии, имена и отчества всех студентов мужского пола, не сдавших более двух экзаменов - Pascal
вывести фамилии, имена и отчества всех студентов мужского пола , не сдавших более двх экзаменов

Hайти и записать вместо x[1] наибольший элемент, а вместо x[2] -наименьший для массива x[1],x[2],..., x[100]. - Pascal
Hайти и записать вместо x наибольший элемент, а вместо x -наименьший для массива x,x,..., x.

Сформулировать строку, содержащую фамилию и инициалы - Pascal
Ребят помогите! В строке содержится фамилия, имя и отчество. Сформулировать строку, содержащую фамилию и инициалы. +++++ ...

Из исходной строки выделить фамилию и инициалы - Pascal
Стандартные процедуры и функции работы со строками. "Дана строка, содержащая фамилию имя отчество в любом регистре. Получить фамилию и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru