Ответ №1
С файлом ничего не приключилось, где был, там и лежит
Название видеокартыНазвание монитораРазрешениеОбъём видеопамятиКоличество отображаемых цветовMDA — Monochrome Display AdapterMD720x35064 бита - 128 КбCGA — Color Graphics AdapterCD640x200128 КбHGC — Hercules Graphics CardMD +720x348128 КбEGA (1984)-Enhanced Graphics AdapterECD640x350128 битов - 512Кб16-64VGA (1987) — Video Graphics ArrayBCD640x480256 - 512 КбSVGA — Super VGABCD800x600256 Кб - 1 Мб256 - 16 млн.XGA — extended Graphics ArrayECD1600x12001 - 4 Мб
Г) Оперативная памать (ОП) - это внутренняя память. А все остальное внешняя память.
Var
k: integer;
a, s: real;
begin
write('Начальная стоимость: ');
readln(a);
write('Число проданных газет: ');
readln(k);
if k <= 50 then s := k * a
else
begin
s := 50 * a;
s := s + (k - 50) * a * 1.2;
end;
writeln('Выручка составила ', s, ' руб.');
end.