Question

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

Answer 1

Const
n=5;
var
a:array[1..n] of string;
c:char;
i:integer;
begin
for i:=1 to n do
begin
writeln('Введите фамилию №',i);
readln(a[i]);
end;
writeln('Введите букву');
readln(c);
writeln('На букву ',c,' начинаются фамилии:');
for i:=1 to n do
if a[i][1]=c then
writeln(a[i]);
end.
ТЕСТ
Введите фамилию №1
Виноградов 
Введите фамилию №2
Анисимов 
Введите фамилию №3
Кондратьев 
Введите фамилию №4
Соколов 
Введите фамилию №5
Архипов 
Введите букву
А
На букву А начинаются фамилии:
Анисимов 
Архипов  

Answer 2

Чтобы создать массив из 5 фамилий и вывести на экран те из них, которые начинаются на определенную букву, нужно использовать язык программирования. Вот пример такого кода на языке Python:

# Создаем массив из 5 фамилий
surnames = ["Иванов", "Петров", "Сидоров", "Смирнов", "Козлов"]

# Получаем букву от пользователя
letter = input("Введите букву: ")

# Проходим по каждой фамилии в массиве
for surname in surnames:
    # Проверяем, начинается ли фамилия на введенную букву
    if surname.startswith(letter):
        # Выводим фамилию на экран
        print(surname)

При запуске этого кода программа попросит вас ввести букву с клавиатуры. Затем она пройдет по каждой фамилии в массиве `surnames` и выведет на экран те из них, которые начинаются на введенную букву.

Например, если вы введете букву "С", программа выведет фамилии "Сидоров" и "Смирнов".