У Pascal :)
От: Eugene_B  
Дата: 23.01.02 08:30
Оценка:
Вот такой вот код, включающий выделение памяти из кучи,
строки неог. длины, преобразование строки в целое, вещественного в целое, чтение и запись в файл аналогами printf и
scanf дает при компиляции 15 872 b.

program project1;
uses
Windows;
var s: string;
pi: ^integer;
F: Text;
d: double;
c: integer;
begin
Assign (F, 'c:\a.txt');
Reset (F);
readln (F, s);
readln (F, d);
new (pi);
val (s, pi^, c);
if pi^ > d then
MessageBox (0, '>', '', MB_OK)
else
MessageBox (0, '<=', '', MB_OK);
close (F);
ReWrite (F);
writeln (F, d);
writeln (F, pi^);
close (F);
dispose (pi);
end.
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.