Составить программу, которая по введѐному названию страны Европы будет выводить на
экран название столицы (например, вводим Греция - получаем "Столица Греции Афины");

program Europe;uses crt;var a,b : string;beginwrite('Введите название страны ');Readln(a);b:='Я не знаю такой страны';if a='Греция' then b:='Столица Греции - Афины'; Writeln(b);end.(По аналогии ,если нужно будет, можешь добавить и другие страны)