Допишите программный код, очень Задача.Написать программу, которая проверяет введенный возраст человека и определяет возрастной его период. При вводе ошибочных данных программа выдает сообщение «Не верно введён возраст».
1. Составим словесную модель:
По данным Всемирной организации здравоохранения
0-12 - детство
13-17 - юность
18-44 - молодость
45-60 - средний возраст
61-75 - пожилой
76-90 - старческий
91+ - долгожитель

procedure TForm1.Button1Click(Sender: TObject);

var …………………………..;

begin

N:= StrToInt (Edit1.Text);

case ……… of

0..12 : Label3.Caption:= ‘……………………………';

……………………………………………………………………..

……………………………………………………………………..

……………………………………………………………………..

……………………………………………………………………..

……………………………………………………………………..

……………………………………………………………………..

……………………………………………………………………..

Else Label3.Caption:= 'Не верно введен возраст';

end;

end;

ПтичкаСоловей    1   04.05.2020 06:33    5