По номеру класса определить в начальной школе, среднем звене или в старших классах...

0 голосов
188 просмотров

По номеру класса определить в начальной школе, среднем звене или в старших классах обучается ученик. ЗАПРЕЩАЕТСЯ ИСПОЛЬЗОВАТЬ ОПЕРАТОР case! Необходимо написать текст программы на Паскале!


Информатика (39 баллов) | 188 просмотров
Дан 1 ответ
0 голосов

Відповідь:

var a:real;

begin

a:=StrToFloat(Edit1.Text);

if a=4

Then Label1.Caption:= 'Начальная школа';

Else a

Then Label1.Caption:= 'Начальная школа';

Else a=8

Then Label1.Caption:= 'Средняя школа';

Else a

Then Label1.Caption:= 'Средняя школа';

Else a=11

Then Label1.Caption:= 'Старшая школа';

Else a>8

Then Label1.Caption:= 'Старшая школа';

end;                            

Пояснення:

(113 баллов)
0

или я чего-то не понял или рациональней логика такая:
если <=4 то начальная, иначе если <=9 средняя иначе старшая