Напишите программу, которая при наборе с клавиатуры
названия страны выводит на экран название столицы
данной страны и численность населения, проживающего
в ней.
Население (млн чел.)
9,7
60
10
Государство
Венгрия
Италия
Греция
Турция
Египет
Непал
Бельгия
Столица
Будапешт
Рим
Афины
Анкара
Каир
Катманду
Брюссель
55
53
29
11
названия страны выводит на экран название столицы
данной страны и численность населения, проживающего
в ней.
Население (млн чел.)
9,7
60
10
Государство
Венгрия
Италия
Греция
Турция
Египет
Непал
Бельгия
Столица
Будапешт
Рим
Афины
Анкара
Каир
Катманду
Брюссель
55
53
29
11
Answers & Comments
Ответ:
А вот это сам код:
uses Исполнители;
begin
var name:string;
Readln(name);
foreach var страна in Страны do
if страна.Название.НачинаетсяНа(name) then
begin
Вывести(страна);
end;
end.
Объяснение: