Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.78/9: Рейтинг темы: голосов - 9, средняя оценка - 4.78
Daty
0 / 0 / 0
Регистрация: 30.05.2013
Сообщений: 10
1

Составить массив из 5 фамилий и вывести на экран те из них, которые начинаются с определенной буквы

06.06.2013, 22:43. Просмотров 1743. Ответов 2
Метки нет (Все метки)

Помогите с задачками в паскале )) срочно надо...(((
1) Составите массив из 5 фамилий и выведете их на экран те из них, которые начинаются с определенной буквы, которая вводится с клавиатуры.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
06.06.2013, 22:43
Ответы с готовыми решениями:

Вывести на экран студентов, фамилии которых начинаются с гласной буквы
Составить список , содержащий сведения об N студентах.Для каждого студента...

Вывести на экран слова, которые начинаются и заканчиваются на одну и ту же букву
дан текст,слова в котором разделенны хотя бы одним пробелом. Вывести на экран...

Вывести на экран все слова строки, которые начинаются на вводимый с клавиатуры символ
Дана строка, состоящая из 4 слов. Вывести на экран все слова строрки, которые...

Дана последовательность слов, разделенных пробелами. Вывести на экран те из них, которые содержат букву А.
Здравствуйте, буду очень благодарен, если поможете с решением нескольких задач....

Вывести те строки, которые начинаются с буквы ‘b’
Задача: Вводит ряд строк и выводит те из них, которые начинаются с буквы ‘b’.

2
_Developer
application developer
121 / 87 / 89
Регистрация: 30.12.2012
Сообщений: 511
08.06.2013, 11:41 2
Лучший ответ Сообщение было отмечено Daty как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
var
  ch: char; 
  i: byte;
  str: string;
 
const
  a: array[1..5] of string = ('Иванов', 'Сорокин', 'Козлов', 'Петров', 'Богданович');
 
begin
  write('Введите букву: ');
  readln(ch);
  for i := 1 to 5 do
  begin
    str := a[i];
    if (str[1] = ch) or (str[1] = upcase(ch)) then writeln(a[i]);
  end;
end.
2
Daty
0 / 0 / 0
Регистрация: 30.05.2013
Сообщений: 10
09.06.2013, 15:32  [ТС] 3
Спасибо Вам! =)
А вы бы не могли бы помочь вот с этой еще задачкой?
Опишите множество Alf('а'..'я') и поместите в него гласные буквы. Создайте диалог проверки наличия в множестве согласных букв.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
09.06.2013, 15:32

Подсчитать количество слов в строке, и вывести на экран только те из них, которые начинаются с буквы 'а'
Здравствуйте, нужна ваша помощь в решении задачи по Turbo Pascal Задача:Дана...

Ввести ряд строк и вывести те из них, которые начинаются с буквы «b»
Напишите программу, которая вводит ряд строк и выводит те из них, которые...

Ввести ряд строк и вывести те из них, которые начинаются с буквы ‘b’
Помогите пожалуйста с кодом. Надо ввести ряд строк и вывести те из них,...


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

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

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