Модели объектов и процессов можно разбить на пять групп: вербальные, математические, кибернетические, табличные, графические.
Под вербальными моделями понимаются описательные модели в цифровом виде, пригодном для обработки на компьютере. В эту группу входят и математические модели, доведенные до стадии алгоритма.
Кибернетические модели — это модели, использующие принцип «чёрного ящика». О внутреннем содержании этого состояния можно судить, подавая сигналы на вход «ящика» и наблюдая его реакцию на выходе из «ящика».
В группу табличных информационных моделей попадают электронные таблицы видов «объект - свойство», «объект - объект» и «двоичная матрица». В каждой строке таблицы «объект - свойство» содержится информация об одном объекте или одном событии. В таблицах «объект - объект» отображаются взаимосвязи между разными объектами. В таблицах «двоичная матрица» отображается качественный характер связи между объектами.
В группе графических информационных моделей выделяют четыре вида моделей: схемы, чертежи, карты, графы. Графы, в свою очередь, разбиты на две категории — иерархические системы и сети.
program CS;
var S,C:real;
var r:integer;
Const pi = 3.14;
begin
writeln('Введите радиус');
Readln(r);
C:= 2*pi*r;
S:= pi*sqr(r);
Writeln('Длина окружности = ', C:5:2);
Writeln('Площадь круга = ', S:5:2);
Readln();
end.
Объяснение:
Указываем переменные и константу pi. Так как радиусом указывается целое число, то присваиваем целочисленный тип (integer).
Площадь же и длина могут выходить за рамки целых чисел, поэтому присваиваем им вещественный тип (real).
writeln('Введите радиус'); - Выводит на экран надпись в скобках.
Readln(r); - функция для ввода радиуса
C:= 2*pi*r; - присваиваем значение для С (длина окружности)
S:= pi*sqr(r); - присваиваем значение для S (площадь круга)
Writeln('Длина окружности = ', C:5:2); - вывод на экран длины окружности ( двоеточие нужно для округления. После первого двоеточия указывается отступ от крайнего символа в данной строке, а после второго количество знаков после запятой).
Writeln('Площадь круга = ', S:5:2); - вывод на экран площади круга.
Readln(); - требуется для того, чтобы программа сразу не закрывалась. (В чистом PascalABC вроде бы не требуется, а вот в DELPHI точно. Но лучше оставить, если спросят, что это, то ты знаешь что ответить)
