3750кбайт=3750*1024байт=3840000байт
2мин=120с
3840000байт/120с=32000байт/с
1байт=8бит
32000*8=256000бит/с
Значение переменной y в команде x:=x+y не меняется, т.е y=25
x(новое) = x(старое)+y ⇒ x(старое) = x(новое)-y = 7-25 = -18
Ответ: x=-18; y=25
Program Kolobok;
var zver:string;
begin
writeln('Ispekla babka kolobka i postavila yego na okoshko ostuzhatsya');
writeln('Ubezhal kolobok ot deda i ot babki i pokatilsya po dorozhke');
writeln('Kolobok katitsya, a navstrechu yemu zver');
writeln('Vvod zverya');
readln(zver);
if Zver = 'lisa' then
begin
writeln('Kolobok poyot pesenku dva raza');
writeln('Proshchay, Kolobok ...');
end
else
begin
writeln('Kolobok poyot pesenku');
writeln('Katitsya dalshe');
end;
end.