Дано натуральное число, если оно больше 5, то возведите в квадрат, если нет, то пусть на экране появится надпись ошибка ввода

Var    a: integer; begin   write('введите число: ');   read(a);   if(a > 5) then a : = a * a   else write('ошибка ввода'); end.

Program pr_1;
var a:array [1..n] of integer;
i, c, n:integer;
begin
readln(n)
for i:=1 to n do
begin
a[i] := random(150, 180);
c := c + a[i];
end;
writeln(c / n);
end.

В повседневной жизни, на производстве, в научно-иследовательской, инженерной или любой другой деятельности человек постоянно сталкивается с решением задач.
Практически во всех науках о природе, живой и неживой, об обществе, построение и использование моделей – мощное орудие познания. Реальные объекты и процессы бывают столь многообразны и сложны, что лучшим (а иногда и единственным) способом их изучения часто являются построение и исследование модели, чем эта реальность.
Моделирование (в широком смысле) – основной метод исследований во всех областях знаний, в различных сферах человеческой деятельности.

Принтер-это устройство вывода текстовой и графической информации из персонального компьютера на бумажный носитель. В современных моделях принтеров существует возможность вывода информации на какой-либо другой носитель, например синтетическая пленка.