Program todec;
uses crt;
function detob(x:integer):string;
var s:string;
begin
s:='';
while x>0 do
begin
s:=chr(ord('0')+x mod 2)+s;
x:=x div 2;
end;
detob:=s;
end;
var a: integer;
begin
clrscr;
writeln('Введите число:');
readln(a);
writeln('Полученное число:',detob(a));
readln;
end.
Program b1; // отмеченные // писать не надо/
var a: string; // строковая переменная//
i: integer; // для цикла for//
n: integer; // кол-во раз//
begin // начало программы//
n:=4; //кол-во раз(в данном случае 4)//
a:='this is a text'; //текст//
for i:=1 to n do //цикл с 1 до n//
writeln(a); // вывод текста с каждой новой строки, если надо все в одну строку, то используем write(a);//
end. //конец//
Файл – это информация, хранящаяся во внешней памяти как единое целое и обозначенная именем.
Системы управления базами данных
<span>Примером может послужить Microsoft Access </span>
<span>Основные компоненты MS Access: </span>
<span>* построитель таблиц; </span>
<span>* построитель экранных форм; </span>
<span>* построитель SQL-запросов (язык SQL в MS Access не соответствует стандарту ANSI); </span>
<span>* построитель отчётов, выводимых на печать.</span>