Текст рассказа набран на компьютере ( один символ весит 8 бит). Информационный обьём получившегося файла - id1174198920221114 от katy1231231233 14.11.2022 00:37

Question

Информатика: Текст рассказа набран на компьютере ( один символ весит 8 бит). Информационный обьём получившегося файла 15 Кбайт . Текст занимает 10 страниц , на каждой странице одинаковое количество строк, в каждой строке 64 символа. Определите, сколько строк помещается на каждой странице.

katy1231231233 · Accepted Answer

Procedure swap(var a, b: real);
var t: real;
begin
t := a;
a := b;
b := t;
end;

var a, b, c: real;
begin
readln(a, b, c);
if (a > b) then swap(a, b);
if (b > c) then swap(b, c);
if (a > b) then swap(a, b);
writeln(a, ' ', b, ' ', c);
end.

Без процедур:

var a, b, c, t: integer;
begin
readln(a, b, c);
if (a > b) then
begin
t := a;
a := b;
b := t;
end;
if (b > c) then
begin
t := b;
b := c;
c := t;
end;
if (a > b) then
begin
t := a;
a := b;
b := t;
end;
writeln(a, ' ', b, ' ', c);
end.

MOGZ ответил