Составить программу на языке Паскаль
С клавиатуры вводится натуральное число К – количество ошибок в контрольной работе. Программа выводит оценку за контрольную работу: «Молодец!», если К=0 «Хорошо», если К=1 или К=2 «Удовлетворительно», если К=3 или К=4 «Выучи тему!», если К>=5
gleb090902
1
05.04.2020 03:01
0
Другие вопросы по теме Информатика
ильюхха
06.03.2019 23:30
BloodyMary001
06.03.2019 23:30
lenok0701
08.12.2020 12:25
ivanychboss
11.05.2020 17:03
yulik9
11.05.2020 17:03
марго398
11.05.2020 17:03
Анимешник9595
11.05.2020 17:03
he11sp0re
11.05.2020 17:03
alexbalahoncev
11.05.2020 17:02
Популярные вопросы
- . предлоги времени : at,in,on....
3 - Определить массу мраморной плиты длиной 50 см, шириной 20 см и высотой 10 см плотность...
1 - Проволочную рамку с подвижной перекладиной AB опустили в мыльный раствор и достали...
2 - гор урока Ін людям воображен... Прослушай текст «Зачем людям нужны воображение...
1 - 8. Разберите омоформы по составу, учитывая их значение и соотношение с другими...
2 - Балет Сильфида это:a. одноактныйb. дивертисментc. многократный...
1 - 1. Прочитайте виразно вірш і виконайте завдання. Зверніть увагу на розділові знаки....
3 - Вычислите. (10+15+20+...+65)-(2+4+6+...+44)=?А)-56Б)208 В)36 Г)6Д)194...
2 - Множественное число прилагательных. множественного числа На занятия говорилось...
3 - Как тульские мастера относились к левше?...
3
var K:integer;
begin
readln(K);
if K=0 then writeln('Молодец!')
else if (K=1) or (K=2) then writeln('Хорошо')
else if (K=3) or (K=4) then writeln('Удовлетворительно')
else if K=5 then writeln('Выучи тему!')
end.