Turbo Pascal

Пух

كنت بلهاء
Модератор

Всё что нужно для работы с файлами, в том числе и типизированными.
 

Storm_10

Member
написал программу, а как в ходе выполнения процедуры её можно остановить? а то ридкей мне не помогает, ставлю считывание в конце, но думаю так не правильно...

у меня есть процедура вывода на экран таблицы , но без паузы...

паскаль АБС
 

Пух

كنت بلهاء
Модератор
написал программу, а как в ходе выполнения процедуры её можно остановить? а то ридкей мне не помогает, ставлю считывание в конце, но думаю так не правильно...

у меня есть процедура вывода на экран таблицы , но без паузы...

паскаль АБС
описать в var переменную ch:char;
в конце процедуры, где нужно сделать паузу написать ch:=readkey;
Если не сработает (хотя должно), не вижу ничего плохого в пустом readln;
 

Storm_10

Member
описать в var переменную ch:char;
в конце процедуры, где нужно сделать паузу написать ch:=readkey;
Если не сработает (хотя должно), не вижу ничего плохого в пустом readln;
:lol:ха readkey правильно не работают даже так, всё таки пустой readln; поставил и всё тип топ!

наверно ещё 1 особенность абс паскаля
 

Storm_10

Member
задачка на Turbo Pascal (студент СумГУ,основи програмування та алгоритмічні мови) мож кто поможет. спасибо
:lol: условие не полное, в помощь читай посты выше там написано про работу с типизированными файлами!


Всё что нужно для работы с файлами, в том числе и типизированными.
 

Пух

كنت بلهاء
Модератор
всем очень интересно делать за вас курсач..
 

Storm_10

Member
нужна помощь с динамическими переменными в Турбо Паскаль:

type
z=^zapis;
zapis=record
inf:string[2];
link:z;
end;
процедура вывода работает не правильно, а может правильно не знаю где точно ошибка в программе
procedure vuvod (var last:z);
var t:z;
begin
new(t);
t:=last;
while t<>nil do begin
write(t^.inf,' ');
readln;
t:=t^.link;
end;
writeln('****');
end;
всё решил свою проблему, проблема оказалась и в этой части и в части создания стека
 
Останнє редагування:
Зверху