Введите с клавиатуры возраст человека и выведите на экран сообщение о его статусе (ребенок, ученик или студент). На паскале, пожалуйста, + блок-схема
Answers & Comments
InformaticX
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. С блок схемой затруднения, сорян.
Answers & Comments
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.
С блок схемой затруднения, сорян.