Program dialog;
var
a: integer;
begin
writeln('Привет! Какая у вас температура? ');
readln(a);
if a>37 then
writeln('Лечитесь дома')
else if a<36 then
writeln('Седите дома')
else
writeln('Идите в шоклу');
end.
Да будет, отличаться будет типом данных. так же в зависимости во что ты конвектируешь он может изменить и свой размер, но насчет второго могу ошибаться, но в закрепление все же скажу что это зависит от сжатия файла, ну к примеру если оригинальную песню (купить прям лицензионный диск какого нибудь исполнителя) и конвектировать его в mp3, то его размер должен будет уменьшиться, как и качество самого трека
Var a,b,c,s,n,i:integer;
begin
readln(n);
b:=1;
for i:=1 to n do
begin
c:=b+a;
s:=s+c;
a:=b;
b:=c;
end;
writeln('s=',s);
<span>end.</span>
Дополнительное ПО, суда можно отнести Microsoft word Openoficeorg, Writer и другие
Пуск-Панель управления-Мышь- Свойство