Подскажите, пожалуйста, в чем ошибка программы? Паскаль ничего не пишет, но правильный ответ не выдает.
program p1;
var a,b:= integer;
var f,g: File of integer;
begin
assign (f,'C:In.txt');
reset (f);
read (f,a);
close (f);
b:= a+10;
assign (g,'C:Out.txt');
rewrite (g);
write (g,b);
close (g);
end.
Ответы на вопрос
Ответил srzontmp
0
замените первую строку на следующую
var a,b: integer;
вторую строку замените на следующую
f,g:text;
чем вы записывали число в файл in.txt ?
по Вашей программе там должно быть число,
а Вы наверное записали в файл символьное представление числа
для символьного представления тип файла text
var a,b: integer;
вторую строку замените на следующую
f,g:text;
чем вы записывали число в файл in.txt ?
по Вашей программе там должно быть число,
а Вы наверное записали в файл символьное представление числа
для символьного представления тип файла text
Новые вопросы
Қазақ тiлi,
2 года назад
История,
2 года назад
Математика,
9 лет назад
Математика,
9 лет назад
Биология,
10 лет назад