Question

Напишите программу, которая при наборе с клавиатуры
названия страны выводит на экран название столицы
данной страны и численность населения, проживающего
в ней.
Население (млн чел.)
9,7
60
10
Государство
Венгрия
Италия
Греция
Турция
Египет
Непал
Бельгия
Столица
Будапешт
Рим
Афины
Анкара
Каир
Катманду
Брюссель
55
53
29
11​

Answer 1

Ответ:

А вот это сам код:

uses Исполнители;

begin

var name:string;

Readln(name);

foreach var страна in Страны do

if страна.Название.НачинаетсяНа(name) then

begin

Вывести(страна);

end;

end.

Объяснение: