Pascal, используя Case. Желая бы одну1)Составить программку, которая анализирует студента по

Pascal, используя Case. Хотя бы одну
1)Составить программку, которая анализирует студента по его оценкам и выводит на экран одно из извещений: Вы учитесь плохо, Вы обучайтесь посредственно и т.д.
2)Дано целое число k(1lt;=klt;=365). Определить, каким будет K-й денек года: субботой, воскресеньем или рабочим днем, если 1 января понедельник.
3)Ввести возраст малыша. Вывести в какой отряд пионерского лагеря он попадет, если известен принцип рассредотачивания:
с 6 до 7 лет - 5 отряд; с 7 до 9 лет - 4 отряд;
с 9 до 11 лет - 3 отряд; с 11 до 13 - 2 отряд
с 13 до 15 (включительно) - 1 отряд.

Задать свой вопрос
1 ответ
Program student;

var

ocenka:byte;

begin

writeln('vvedite ocenku');

readln(ocenka);

case ocenka of

1:  writeln('ochen ploho!');

2:  writeln('ploho');

3:  writeln('udovletvoritelno');

4:  writeln('horosho');

5:  writeln('otlichno');

end;

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт