В данной программе пишет само число, а не коды цифр. Например, при вводе 5 получается как во вложении. То есть пишется 5, а отображается 5-ый символ по какой-то из кодировок.
В простейших случаях, для олимпиадных задач, например, можно сделать так
assign (input, 'a'); reset (input);
assign (output, 'b'); rewrite (output);
Это перенаправит стандартный ввод-вывод в эти файлы.
Тетрадь какого класса?
Напиши в комментарии<span />
Var
a,b,c,max:real;
begin
write('a=');
readln(a);
write('b=');
readln(b);
write('c=');
readln(c);
max:=a;
if (b>a) and (b>c) then max:=b;
if (c>b) and (c>a) then max:=c;
write('Максимальное число: ',max:5:2);
readln;end.
Поищи как в инете сайты делать за 5 минут и там все будет написано, поверь мне, я сам так раньше делал, а теперь забыл.
<span>В) FoxitReader - </span>программное обеспечение, для просмотра электронных документов
не является браузером