Помощь - Поиск - Пользователи - Календарь
Полная версия: Надо до завтра программку написать
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Львёнок
Она начального уровня я просто ничего уже не помню...............
1)Ваша бабушка спрашивает,какую оценку вы получили,и в зависимости от оценки выдаёт комментрий.Зациклить выполнение программы по запросу пользователя.
я просто тэги не помню.......... sad.gif
klem4
Ты уверена что написал в нужный раздел ? Здесь решают задачи только за деньги, твоя задача врядли подходит под эту категорию, если хочешь перенесу в раздел задачи.

+ Правида форума :

4. Название вашей темы должно быть информативно!

При создании темы учтите, что название должно кратко отражать ее суть. Плодить топики с названиями "ПАМАГИТЕ!!!" или "ПОЧЕМУ?!?!" крайне не рекомендуется, и жестко карается модераторами.
Львёнок
ок,перенеси ,если не трудно,за название прости....... smile.gif blush.gif
klem4
Попробуй написать программу сама, здесь все просто ;)

Открой книгу, и почитай как использовать в Паскале условный оператор if(конструкцию if ... then ... else ... ) и оператор case

Этих знаний тебе хватит для выполнения работы.
Львёнок
Какой оператор нужен,что бы вводить оценку???
klem4
Разберешься ?

uses crt;

const

msg : array['2'..'5'] of string = (
'Не удовлетворительно',
'Удовлетворительно',
'Хорошо',
'Отлично'
);

var

ch: char;

begin

clrscr;

repeat

clrscr;

writeln('Введите оценку, либо нажмите <ESC> для выхода');

ch := readkey;

if ch in ['2'..'5'] then begin
writeln(ch, ' - ', msg[ch]);
writeln('Нажмите <ENTER> для продолжения');
readln;
end;


until ch = #27;

end.
Львёнок
Спасибо большое!!! give_rose.gif give_rose.gif smile.gif respect2.gif
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.