Var y, x: integer;
begin
readln(y);
x:=y-2;
writeln(y, '= ', x, '+2');
end.
Так как-то
2. колонтитул
3. вставка
4.стиль документа
5. шаблон
6. в Word 2013 - вкладка "Источник бумаги" a здесь видимо вопрос по более ранней версии: не могу ответить
А) Саратов,Самара,Париж,Волгоград,Воронеж и т.д.
б) Нельзя дописать Волга, тк это река и Россия, тк это Страна
<em>Наверное так :З</em>
var x:real;
Begin
write('Введите число: '); read(x);
writeln('Целое число: '+floor(x));
var r:real := 1;
for var i := 1 to length(''+(x-floor(x)))-2 do
r := r * 10;
writeln('Дробное число: '+((x-floor(x))*r + (floor(x) * r))+' / '+r+'');
write('Округленно число: ', round(x));
End.
Если алфавит на 64 символа, то один символ займет 6 бит
Общий объем текста 600 бит или 75 байт
