Для какого из приведенных чисел ложное высказывание: (число больше 30) или не ((число четное) и (число больше равно 10))? 1) 5 2) 8 3)17 4)28 2 не (первая буква согласная) или (последняя буква гласная)? 1)сова 2)слон 3)аист 4)анаконда 3 (последняя буква согласная) или (первая буква гласная)? 1)коза 2)барсук 3)осел 4)оса 4 ((последняя буква согласная) или (вторая буква гласная)) или (первая буква согласная)? 1)жираф 2)страус 3)индюк 4)антилопа 5 (последняя буква согласная) или не ((первая буква согласная) и (вторая буква гласная))? 1)тигр 2)выдра 3)енот 4)краб

Модель — это искусственно создаваемый объект, заменяющий некоторый объект реального мира (объект моделирования) и воспроизводящий ограниченное число его свойств. Понятие модели относится к фундаментальным общенаучным понятиям, а моделирование — это метод познания действительности, используемый различными науками.

Формализация 
К предметной области информатики относятся средства и методы компьютерного моделирования. Компьютерная модель может быть создана только на основе хорошо формализованной информационной модели. Что же такое формализация?

Формализация информации о некотором объекте — это ее отражение в определенной форме. Можно еще сказать так: формализация — это сведение содержания к форме. Формулы, описывающие физические процессы, — это формализация этих процессов. Радиосхема электронного устройства — это формализация функционирования этого устройства. Ноты, записанные на нотном листе, — это формализация музыки и т.п

Const
  Pi=3.1415926598;
var
  c:integer;
  r,a,b,h:real;
begin
   Writeln('Введите код вычисляемой величины: ');
   Writeln('1 - длина окружности');
   Writeln('2 - площадь круга');
   Writeln('3 - объем цилиндра');
   Writeln('4 - объем параллелепипеда');
   Write('-> '); Read(c);
   case c of
   1: begin
        Write('Введите радиус окружности: '); Read(r);
        Writeln('Длина окружности равна ',2*Pi*r)
      end;
   2: begin
        Write('Введите радиус круга: '); Read(r);
        Writeln('Площадь круга равна ',Pi*r*r)
      end;
   3: begin
        Write('Введите радиус и высоту цилиндра: '); Read(r,h);
        Writeln('Объем цилиндра равен ',Pi*r*r*h)
      end;
   4: begin
        Write('Введите длину, ширину и высоту параллелепипеда: '); Read(a,b,h);
        Writeln('Объем параллелепипеда равен ',a*b*h)
      end
   end
end.

Пример работы
Введите код вычисляемой величины:
1 - длина окружности
2 - площадь круга
3 - объем цилиндра
4 - объем параллелепипеда
-> 3
Введите радиус и высоту цилиндра: 5 18.3
Объем цилиндра равен 1437.2786418585