Var
a,b,c : integer;
Begin
Read(a,b,c);
If a>= 0 then a:= sqr(a)
else a:= abs(a);
If b>= 0 then b:= sqr(b)
else b:= abs(b);
If c>= 0 then c:= sqr(c)
else c:= abs(c);
Write(a,b,c);
End.
ответ: 14) 12Кбайт = 12000 Байт
15) 896
16) Под блокнотом подразумевается стандартный Windows Notepad. Он как дважды два, и таким и задумывался. Предназначен для и возможно редактирования текстовых файлов(не документов, форматирование не изменяется), например .txt, .xml, .html и тд.
MSO Word предназначен для создания редактирования текстовых документов (не текстовых файлов) предназначеных в первую очередь для людьми. Потому очень много уделяется внимания форматированию текста, можно добавлять всякие рисунки, таблички и прочее.
Можно редактировать и текстовые файлы, но это не удобно.
Объяснение: 14) 1Кбайт = 1000 Байт
15) На каждый символ отводится по 2 байта а там 56 символов. 2*56= 112 байт. 1 Байт = 8 Бит
16) Тут объяснять то даже нечего.
ответ: вес текстового файла с брошюрой 38.328125 Кбайт
ДАНО:
брошюра на 16 страниц,
в среднем каждая страница содержит 32 строки,
каждая строка содержит 64 символа,
а каждый символ весит 1 байт
вычисляем кол-во символов
16 * 32 = 10 * 32 + 6 * 32 = 320 + 192 = 512(с) - кол-во строк
512 * 64 = 512 * 60 + 512 * 4 = 37200 + 2048 = 39248(с) - кол-во символов
вычисляем кол-во Кбайт
39248 * 1 = 39248(б) - вес в байтах
39248 / 1024 = 38.328125(кб) - вес в килобайтах(да признаюсь тут уже использовал калькулятор)
Объяснение:
Begin
Read(a,b,c);
If a>= 0 then a:= a*a else a:= abs(a);
If b>= 0 then b:= b*b else b:= abs(b);
If c>= 0 then c:= c*c else c:= abs(c);
Write(a,b,c);
End.