При увеличении в растровом изображении начинают виднеться пиксели, а приуменьшении пиксели сливаются и картинка становится не ясной. При вращении качество не меняется
===== PascalABC.NET =====
procedure Tri(a, b: real; var c, S, P: real);
begin
c := Sqrt(a * a + b * b);
S := 0.5 * a * b;
P := a + b + c
end;
begin
var (a, b) := ReadReal2('Введите длинв катетов:');
var c, S, P: real;
Tri(a, b, c, S, P);
Writeln('Гипотенуза ', c:0:3, ', площадь ', S:0:3,
', периметр ', P:0:3)
end.
Пусть на второй странице Х байт информации.
Тогда на 1 странице 2Х байт информации.
3Х = 258
Х = 86 байт - весит 2 страница.
86*2 = 172 байта - весит первая страница.
Т.к. не дано сколько весит 1 символ, пусть это будет Y(в байтах).
Ответ: 172/Y
компьютерые сети, в зависимости от охватываемой территории подразделяются на:
локальные, региональные и глобальные.
//PascalABC.NET 3.1 сборка 1200
begin
repeat
var n := Random(1000);
if n mod (5 * 7) = 0 then begin
write(n);
Readln;
end
until false;
end.