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