Программирование ver 4.1

и еще один маленький вопрос.

я создаю новую последовательность для ввода фамилии, ввожу ее он выводит все что мне нужно.

но вот последовательность у меня от 1 до 5( к примеру я ввел 1 фамилию и все мне теперь нужно завершить последовательность)

можно как нибудь для этой последовательности намутить команду которая будет завершать ее

что то типа if (вводимое значение)=(команда выхода) then закрыть последовательность

пиздец, мне бы проблемы казика

 

и еще один маленький вопрос.

я создаю новую последовательность для ввода фамилии, ввожу ее он выводит все что мне нужно.

но вот последовательность у меня от 1 до 5( к примеру я ввел 1 фамилию и все мне теперь нужно завершить последовательность)

можно как нибудь для этой последовательности намутить команду которая будет завершать ее

что то типа if (вводимое значение)=(команда выхода) then закрыть последовательность

сделай например, если ввели пустую строку, то выход.

или вводи по одной фамилии

а ещё можно нарисовать гуй

разобрался, присвоил рандомной букве значение стоп

и если я ввожу стоп то он стопиться

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

попробую надавить на жалость преподу, пусть без этого ставит

ты для начала узнай нет ли какого способа средствами пакаля в одну строку это отсортировать

ты для начала узнай нет ли какого способа средствами пакаля в одну строку это отсортировать

а то лень гуглить, заебался со ссаным паскалем

всем спс за помощь

ты для начала узнай нет ли какого способа средствами пакаля в одну строку это отсортировать

ты для начала узнай нет ли какого способа средствами пакаля в одну строку это отсортировать

ты кажется не догадываешься зачем в универе вообще учатся.

я-то знаю, но это же казик :trollface:

бля пиздец

если я на курсе самый умный

то что вы скажете про моих однокурсников

если я на курсе самый умный

у вас на курсе ни один человек не в состоянии составить алгоритм сортировки?

тогда

попробую надавить на жалость преподу, пусть без этого ставит

всем здравствуйте. Подскажите где можно взять готовые проекты по посторению графиков в с++, по точкам, типа пользователь вводит в таблицу значения х и у, и строится график. Интересуют в первую очередь готовые проекты, ну чтобы глянуть как там и чего работает, но можно и инфу какую-нибудь, буду рад любой помощи. Заранее спасибо

бля пиздец

если я на курсе самый умный

то что вы скажете про моих однокурсников

всем здравствуйте. Подскажите где можно взять готовые проекты по посторению графиков в с++, по точкам, типа пользователь вводит в таблицу значения х и у, и строится график. Интересуют в первую очередь готовые проекты, ну чтобы глянуть как там и чего работает, но можно и инфу какую-нибудь, буду рад любой помощи. Заранее спасибо

что значит график?

Ты же не в консоли его рисовать хочешь.

Если винапи, то что-то типа

BeginPaint();

LineTo();

LineTo();

LineTo();

LineTo();

.....

EndPaint();

бля пиздец

если я на курсе самый умный

то что вы скажете про моих однокурсников

А как ты определил, что именно ты, тот единственный, самый умный?

Я вот в универ почти не ходил, и одна тупоголовая пизда, мыслящая понятиями котлет и метлы, считала, что я тупой и нихуя не знаю, и вечно удивлялась, почему я все сдаю на 8+/10. Думала что везет, и я преподов уламываю. За столько лет так и не проследила закономерность...

System.Drawing.Graphics

бля пиздец

если я на курсе самый умный

то что вы скажете про моих однокурсников

А как ты определил, что именно ты, тот единственный, самый умный?

Я вот в универ почти не ходил, и одна тупоголовая пизда, мыслящая понятиями котлет и метлы, считала, что я тупой и нихуя не знаю, и вечно удивлялась, почему я все сдаю на 8+/10. Думала что везет, и я преподов уламываю. За столько лет так и не проследила закономерность...

посты? :(

ребя, старый код, тока пытаюсь все впихнуть файл, чето не получается, может кто сказать где ошибка?

program zadacha_1;
uses
 crt;
type
 s = record
   fam: string[15];

   im: string[10];
   ot: string[15];
   yl: string[15];
   dom: integer;
   kv: integer;
   dt_m: string[15];
   dt_g: integer;

 end;
var
 f2: string[15];
 a: array [1..30] of s;
 n: integer;
 i: integer;
 p: integer;
 k: integer;
 w := 'stop';
 f: file of s;
begin

 assign(f, 'C:\bd.txt');
 rewrite(f);

 writeln('Введите количество работников на заводе');
 readln(n);
 for i := 1 to n do
   with a[i] do
   begin
  write('Введите фамилию ', i, ' работника-->');
  readln(fam);
  write('Введите имя работника-->');
  readln(im);
  write('Введите отчество работника-->');
  readln(ot);
  write('Введите улицу-->');
  readln(yl);
  write('Введите номер дома-->');
  readln(dom);
  write('Введите номер квартиры-->');
  readln(kv);
  write('Введите месяц поступления-->');
  readln(dt_m);
  write('Введите год поступления-->');
  readln(dt_g);
   end;
 close (f);

end.

вообще вот рабочий код, токо он цифры может записывать

пытался char сменить на string не получается

var
   f: file of char;
   c: char;
   i, n: byte;

begin
   assign (f, 'c:\file.txt');
   rewrite (f);

   write ('Количество символов: ');
   readln (n);

   for i:=1 to n do begin
    write ('Введите символ: ');
    readln (c);
    write (f, c);
   end;

   close (f);

end.

а еще он ногти красит

вообще вот рабочий код, токо он цифры может записывать

пытался char сменить на string не получается

 

var
f: file of char;
c: char;
i, n: byte;

begin
assign (f, 'c:\file.txt');
rewrite (f);

write ('Количество символов: ');
readln (n);

for i:=1 to n do begin
	write ('Введите символ: ');
	readln (c);
	write (f, c);
end;

close (f);

end.

 

типа 0051 0352 0359 0554 ...