<span>Cele dintai lecturi - Первое чтение</span>
program kolco;
var
s,s1,s2:real;
r1,r2:integer;
begin
writeln('введите r');
readln(r1);
writeln('введите R');
readln(r2);
s1:=pi*sqr(r1);
s2:=pi*sqr(r2);
S:=s2-s1;
writeln('площадь кольца равна:',S:2:3);
readln;
end.
Зная что F = 1111 а 1 это 1 и что каждую цифру нужно заменять по тетрадам(четверкам) по правилу позиционной системы счисления нужно заменить
F на 1111
1 на 0001
и соединить
Ответ : 11110001
Program n1;
var a,b: integer;
begin
readln(a,b);
writeln('срзнач: ',(a+b)/2);
write('сргеом: ',sqrt(a*b));
end.