Введите с клавиатуры возраст человека и выведите ** экран сообщение о его статусе...

Question

Введите с клавиатуры возраст человека и выведите на экран сообщение о его статусе (ребенок, ученик или студент). На паскале, пожалуйста, + блок-схема

Answer 1

Program mq;
var 
age:integer; 
a:array[1..3] of String = ('ребёнок','ученик','студент');
begin
Read(age);
case age of
1..6:WriteLn(a[1]);
7..18:WriteLn(a[2]);
19..25:WriteLn(a[3]);
end;
end.
С блок схемой затруднения, сорян.

Comments

array значит