Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Нарисовать Избушку http://www.cyberforum.ru/pascalabc/thread1108624.html
Ребята ПОМОГИТЕ ПОЖАЛУЙСТА!!! надо в паскале abc нарисовать избушку на курьих ножках
Pascal ABC Подсчитать число отрицательных и число положительных компонент вектора
помогите решить с помощью подпрограмм У вещественного вектора Y (y1, y2, …, yN) подсчитать k – число отрицательных и m – число положительных компонент. Найти и напеча- тать номер первой...
Создать массив роста учащихся 11 класса в сантиметрах и найти самого высокого Pascal ABC
3)создать массив роста учащихся 11 класса в сантиметрах и найти самого высокого всем зарание спасибо
Pascal ABC Создать массив с помощью процедур imp и out 2)создать массив с помощью процедур imp и out http://www.cyberforum.ru/pascalabc/thread1108414.html
Pascal ABC Найти минимальный элемент массива и его индекс http://www.cyberforum.ru/pascalabc/thread1108402.html
1)найти минимальный элемент массива и его индекс
Pascal ABC Найти произведение тех чисел, которые не имеют в своей записи цифры 3
Вводятся 4х-значные числа. Найти произведение тех из них, которые не имеют к своей записи цифры 3.
Pascal ABC Вычислить количество чисел меньших 50
Дано три натуральных числа X,Y,z. Вычислить количество чисел меньших 50. Помогите составить программу в паскале..пожалуйста
Pascal ABC Дано трёхзначное число, кратна ли сумма его цифр 7? дано трёхзначное число, кратна ли сумма его цифр 7? так, вот, значит написала program zad1; var d,n,a,s,m,p:integer; begin writeln('введте трехзначное число'); readln(n); m:=n div 100; d:=n... http://www.cyberforum.ru/pascalabc/thread1108298.html
Pascal ABC Разработать программу, которая упорядочивает элементы массива в алфавитном порядке наименований изделий http://www.cyberforum.ru/pascalabc/thread1108265.html
Каждый элемент исходного массива представляет собой запись, содержащую следующие поля: Наименование изделия: 1.Марка изделия 2.Год выпуска изделия Разработать программу, которая упорядочивает...
Pascal ABC Программа не правильно находит минимальный элемент в записи вот задача: На аптечном складе хранятся лекарства. Сведения о лекарствах содержаться в специальной ведомости: наименования лекарственного препарата; количество; цена; срок хранения( в месяцах).... http://www.cyberforum.ru/pascalabc/thread1108207.html
ildwine
Супер-модератор
3446 / 2027 / 1251
Регистрация: 04.03.2013
Сообщений: 4,921
Записей в блоге: 1
01.03.2014, 21:54 0

По введённому названию страны Европы будет выводить на экран название столицы

01.03.2014, 21:54. Просмотров 2900. Ответов 4
Метки (Все метки)

Лучший ответ Сообщение было отмечено heyHOLLA как решение

Решение

SmartProgramist, не будет работать так как вы предлагаете... case работает только с byte, integer, char...

Добавлено через 3 минуты
Можно еще так:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
program zad1;
var a: string;
begin
writeln('введте название страны');
readln(a);
if a = 'Австрия' then WriteLn('Вена') else
  if a='Азербайджан' then WriteLn('Баку') else
    if a='Албания' then WriteLn('Тирана') else
      if a='Андорра' then WriteLn('Андорра-Ла-Велья') else
        if a= 'Белоруссия' then WriteLn('Минск') else
          if a='Бельгия' then WriteLn('Брюссель') else
            if a='Болгария' then WriteLn('София') else
              if a='Босния и Герцеговина' then WriteLn('Сараево') else
               if a='Ватикан' then WriteLn('Ватикан') else
                if a='Великобритания' then WriteLn('Лондон') else
                  if a='Венгрия' then WriteLn('Будапешт') else
WriteLn('такой страны нет в нашем списке');
readln
end.


Вернуться к обсуждению:
По введённому названию страны Европы будет выводить на экран название столицы
1
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
01.03.2014, 21:54
Готовые ответы и решения:

По введённому названию страны Европы будет выводить на экран название столицы
var a:string; begin writeln('Введите название страны'); readln(a) case a of ...

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

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

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

Составить программу, которая бы выдавала по названию страны название столицы этой страны (использовать не менее 6-7 названий).
Составить программу, которая бы выдавала по названию страны название столицы этой страны...

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