Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.55/11: Рейтинг темы: голосов - 11, средняя оценка - 4.55
bolshakovinka
0 / 0 / 0
Регистрация: 25.11.2011
Сообщений: 15
1

По названию страны вывести название её столицы

26.11.2011, 14:02. Просмотров 2088. Ответов 3
Метки нет (Все метки)

Задача: написать программу которая по названию страны выводит название её столицы(5-7 названий). Не совсем понимаю какой тип брать(char не подходит).Напишите свое решение пожалуйста.
0
Лучшие ответы (1)
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.11.2011, 14:02
Ответы с готовыми решениями:

По введённому названию страны выводит на экран название столицы
Помогите сделать эту программу. По названию страны (переменная типа Country) присвоить переменной...

Вывод столицы по названию страны
rogram stran; const strana:array of string=('Avstria','Bolgariya','Greciya', 'Italiya',...

По названию страны определить название континента
Имеются описания: Type country=(Germany,Cuba,Laos,Monaco,B angladesh,Ukraine); ...

Определить название континента (Азия,Америка,Африка,Европа) по названию страны.
Ничо нету (

Ввести первую букву страны. Вывести название ее столицы
Помогите с задачой в паскале: Составить программу для решения следующих параметров задачи двумя...

3
Puporev
Модератор
57194 / 43652 / 30166
Регистрация: 18.05.2008
Сообщений: 104,067
26.11.2011, 14:16 2
Цитата Сообщение от bolshakovinka Посмотреть сообщение
Не совсем понимаю какой тип брать
А в каком разделе задача? На какой тип?
Можно просто создать 2 строковых массива, государств и их столиц.
При вводе страны ищем ее в первом массиве, если есть, выводим столицу из ячейки с таким же номером второго массива.

Добавлено через 46 секунд
Можно создать массив записей с двумя полями.
0
bolshakovinka
0 / 0 / 0
Регистрация: 25.11.2011
Сообщений: 15
26.11.2011, 14:26  [ТС] 3
Надо обязательно с оператором case.
должно выглядеть где-то так:
Pascal
1
2
3
4
 
case d of 
'Россия':writeln('Москва'); 
и т.д
а не получается так как не знаю что писать в строке
Pascal
1
var d:?
0
Puporev
Модератор
57194 / 43652 / 30166
Регистрация: 18.05.2008
Сообщений: 104,067
26.11.2011, 15:11 4
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Самое простое так.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
uses crt;
var w:char;
begin
clrscr;
writeln('Выберните страну ');
writeln('1-Россия 2-Украина 3-Германия 4-Польша 5-CША');
readln(w);
case w of
'1':write('Москва');
'2':write('Киев');
'3':write('Берлин');
'4':write('Варшава');
'5':write('Нью-Йорк');
else write('Такой страны нет в списке');
end;
readln
end.
0
26.11.2011, 15:11
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.11.2011, 15:11

По заданной стране вывести название столицы этой страны. Для решения взять 8 любых стран
1.По заданной стране вывести название континента, где эта страна находится. Для решения взять 8...

Ввести первую букву названия страны, вывести название ее континента
ввести первую букву названия страны, вывести название континента? включая оператор выбора CASE

По названию страны определить ее столицу
tupe страна = (Австрия, Болгария, Греция, Россия, Италия, Германия); столица = *Вена, София, Афины,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru