program Vozrasr;
var
AGE: integer;//Переменная возраста
begin
writeln('Введите любое число от 1 до 120');
Readln(AGE); //Ввод возраста
if (AGE < 1) or (AGE > 120) then
begin
writeln('ERROR!')
end
else
begin
case AGE of //для чисел от 11 до 20 создаем отд-ый кейс
11..20: Writeln('ответ: Мне ', AGE, ' лет');
Else //иначе если они не входят в диапазон от [11..20], то выполняется второй кейс
begin
case AGE mod 10 of //делим на 10 и получаем остаток =
1: Writeln('ответ: Мне ', AGE, ' год');
2..4: Writeln('ответ: Мне ', AGE, ' года');
0, 5..9: Writeln('ответ: Мне ', AGE, ' лет');
end;
end;
end;
end;
end.
3. Укажите соответствия.
1 поколение - ламповые машины.
2 поколение - полупроводниковые машины на транзисторах.
3 поколение - миникомпьютеры на интегральных схемах.
4 поколение - вычислительные системы на большой интегральной схеме.
4. Запишите пропущенные слова и словосочетания в предложениях.
Одним из первых устройств, облегчающих вычисления, можно считать абак. Следующим этапов люди изобрели аналоговый компьютер. А впоследствии и до сих пор мы пользуемся цифровым компьютером.
5. Заполните пропущенные слова и словосочетания в предложениях.
Робот является одним из признаков развития вычислительной техники пятого поколения, потому что в основе его лежит искусственный интеллект.