Исходники Delphi

Добро пожаловать на наш портал

На нашем сайте ежедневно публикуются десятки качественных и свежих материалов, которые Вы можете скачать абсолютно бесплатно. Рекомендуем Вам добавить Наш сайт в закладки, а также подписаться на RSS ленту, чтобы не пропускать интересных новостей.
Стартовая Избранное Главная Контакты Карта сайта

Меню

Не доступно

Не доступно

Опрос

Оцените мой сайт

Проголосовало: 118
Другие опросы

Главная » Файлы » Исходники Delphi » Для новачка

Оператор выбора CASE
15.02.2013, 01:37
1.3 Оператор выбора CASE
в отличие от оператора if оператор case позволяет выбрать и выполнить один оператор не из двух, а из нескольких операторов

пример:
составить программу выводящую на экран название времени года в зависимости от введенного номера месяца
Код

var n:integer;
s:string;
begin  
writeln ('Enter n');
readln (n);
case n of
1,2,12 : s :='winter';
3,4,5 :s:='spring';
6,7,8 :s:= 'summer';
9,10,11 :s:= 'autumn';
end;
writeln(s);
end.
Категория: Для новачка | Добавил: Reif | Теги: Для новачка
Просмотров: 646 | Загрузок: 0 | Рейтинг: 0.0/0
Всего комментариев: 0


Название блока

Здесь html код

Название блока

Здесь html код

Название блока

Здесь html код

Название блока

Здесь html код

 
Исходники Delphi
Сделать бесплатный сайт с uCoz |