Допишите программный код, очень Задача.Написать программу, которая проверяет введенный возраст человека и определяет возрастной его период. При вводе ошибочных данных программа выдает сообщение «Не верно введён возраст».
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;
2) в 1 дюйме = 2,54 см, значит в 10 см содержится 3,94 дюйма (10/2,54 = 3,94)
3) 3,94* 1200 = 4728 пикселей по ширине и по высоте экрана
4) 4728 * 4728 = 22353984 точек в цветном изображении 10 на 10 см
5) 22353984 * 24 = 536495616 бит - информационный объем изображения
Переведем в большие единицы измерения:
536495616 бит / 8 = 67061952 байт / 1024 = 65490,2 Кбайт / 1024 = 64 Мбайта
ответ: полученный файл будет 64 Мбайта.
В 1642 году машину в сложении чисел изобрёл французскийучёный Блез Паскаль. «Паскалина», как назвал свою конструкцию изобретатель, представляла собой механическое устройство в виде ящичка, наполненного многочисленными шестерёнками. Складываемые числа вводились в машину за счёт соответствующего поворота наборных колёсиков. На каждом из этих колёсиков, соответствовавших одному десятичному разряду, были нанесены деления с цифрами от 0 до 9. При вводе числа колёсики прокручивались до соответствующей цифры. При завершении полного оборота избыток над цифрой 9 переносился на соседний разряд (на 1 позицию сдвигалось соседнее колесо) и так далее.