Ну если нужно просто перевести из десятичной системы счисления в двоичную то получим:
1111(10)= 1*2^10+0*2^9+0*2^8+0*2^7+1*2^6+0*2^5+1*2^4+0*2^3+1*2^2+1*2^1+1*2^0= 10001010111(2)
Ответ:10001010111(2)
<span><em>// PascalABC.NET 3.3, сборка 1576 от 16.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
</span><span>begin
var s:=ReadlnString('Введите имя и фамилию:');
var g:=ReadlnString('Введите год рождения:');
var n:=ReadInteger('Сколько раз повторить вывод?');
loop n do Writeln(s,NewLine,g)
end.
<u>Пример</u>
Введите имя и фамилию: Иванов Сергей
Введите год рождения: 24.06.2001
Сколько раз повторить вывод? 3
Иванов Сергей
24.06.2001
Иванов Сергей
24.06.2001
Иванов Сергей
24.06.2001</span>
номер 17:
номер 19 не видно до конца
//правильно вот так:
Program al;
var c: real;
begin
c:=4.75;
writeln('c=',c);
end.