1. 1 год 3 рыбки, 2 год 1 рыбка, 3 год ещё одна и того 35 рыбак он поймал, ну и столько они сели.
2. 5+7+9+11+13+15+17+19+21+23=140 мин или 2 часа и 20 мин
1)
var a,b,c:real;
begin
write('Введите три стороны треугольника: ');
readln(a,b,c);
if((a < b+c) and (b < a+c) and (c < a+b)) then write('Периметр треугольника: ',(a+b+c):9:3)
else write('Треугольник с данным сторонами не существует');
end.
2)
var a,b:real;
begin
write('Введите два числа: ');
readln(a,b);
writeln('Сумма данных чисел: ',(a+b):9:3);
write('Произведение данных чисел: ',(a*b):9:3);
end.
Ответ: 16-8 в десятичной, в двоичной будет 10000 - 1000 = 1000
Проверка: 1000+1000 = 10000
Begin
for i:=1 to 10 do begin
read (b[i]);
end;
for k:=1 to 10 do begin
a[i]:= b[i]*5;
write (a[i]);
end;
end.