- байты на одной странице.
- байты на одном листе.
<span>Ответ: Примерно поместится 243 листов.</span>
Var a,b,c:real;
begin
writeln ('Введите стороны треугольника');
read (a,b,c);
if ((a + b) > c) and ((a + c) > b) and ((b + c) > a) then writeln ('Существует')
else writeln ('Не существует');
end.
Не собачьи не кошачьи а медвежий
Весьма интересно описан процесс перемножения чисел ;)
Результат операции будет в временной с именем z