Написать программы.. 1 напишите программу, умеющую проверить положительное ли число, введённое с клавиатуры 2 напишите программу в которой из двух введенных с клавиатуры чисел, большее из них выведется на экран 3 напишите программу которая при вводе пяти чисел вычисляла бы их сумму и произведение, и выводила на экран, что из этого больше.

1) var x: real; begin writeln ('введите число'); readln (x); if x> 0 then writeln ('число ', x, ' положительное') else if x< 0 then writeln ('число ', x, ' отрицательное') else if x=0 then writeln ('число ', x, ' не является ни положительным, ни отрицательным'); end. 2. var x, y: real; begin writeln ('введите два числа'); readln (x,y); if x> y then writeln (x) else if x< y then writeln (y) else if x=y then writeln ('числа равны'); end. 3. var x, sum, pr: real; i: integer; begin sum: =0; pr: =1; for i: =1 to 5 do begin write ('введите число: '); readln (x); sum: =sum+x; pr: =pr*x; end; writeln ('сумма чисел = ', sum); writeln ('произведение чисел = ', pr); if sum> pr then writeln (sum) else if sum< pr then writeln (pr) else if sum=pr then writeln ('сумма и произведение равны'); end.

Основные объекты базы данных - это таблицы. сама база данных - это структура таблиц. каждая запись в базе данных имеет слева кнопку, называемую маркером записи 1 - 1 2 - 3 3 - 1.