var name=prompt("Укажите своё имя:"),
surname=prompt("Укажите свою фамилию:"),
age=prompt("Укажите свой возраст:");
alert("Здравствуйте "+name+" "+surname);
alert(age<18?"Вы не совершеннолетний":"Вы совершеннолетний");
567(10) = 5*10^2+6*10^1+7*10^0
94.53(10) = 9*10^1+4*10^0+5*10^(-1)+3*10^(-2)
110.101(2) = 1*2^2+1*2^1+0*2^0+1*2^(-1)+0*2^(-2)+1*2^(-3)
11101(2) = 1*2^4+1*2^3+1*2^2+0*2^1+1*2^0
Процесс создания приложения в Lazarus можно разделить на следующие этапы:
<span>1. Формирование окна программы – расположение необходимых элементов, задание размеров, изменение свойств; </span>
<span>2. Написание программного кода, описание свойств элементов, доступных только во время работы приложения, описание реакций на событие появления окна, нажатие на кнопку и других; </span>
<span>3. Отладка программы. </span>
Var i, byear, eyear, k : integer;
Begin
read(byear, eyear);
byear := byear + 1;
for i := byear to eyear do
if (i >= 1605) and ((i - 1605) mod 10 = 0) then k:= k +1;
writeln(k);
End.