102910<span> = 11</span>001000111111<span>110
11 единиц
</span>
#1
program Program1;var rub, dol:real;begin writeln('Введите сумму в рублях:'); readln(rub); dol:=rub/67; writeln('Сумма в доллорах= ',dol); end.
#2
program Program1;var a,b:integer;beginwriteln('Введите целое число:');readln(a);
if a>0 then b:=a-a-a;if a<0 then b:=a;if a=0 then writeln('Чило = 0');writeln('Чило a=',b); end.
Каталог папка директория в данном случае наверное первое
Ответ:
Ну 8-3 и 8-1, соответственно 5 и 7
Объяснение: