Программирование Казика (pascal included)

где скачать его и учиться прогать!

сам не могу найти и специально спросил, потому что хочу быть таким же элитным как казик

 

удваиваю

Хочешь чтобы я здесь не появлялся?

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

ФУНКЦИИ И ПРОЦЕДУРЫ

ФУНКЦИИ И ПРОЦЕДУРЫ

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

ФУНКЦИИ И ПРОЦЕДУРЫ

а будут разбираться циклы со всякими условиями?

Топик создан специально для Казика и его проблемам с паскалем. А так же тех, кто до сих пор жрет говно пишет на паскале

 

В этой же теме будем вместе учиться паскалю https://ru.wikipedia...ограммирования)

 

Тестировать код тут -- http://pascalabc.net/WDE/

 

Урок номер нуль

 

Разберем простой пример hello, kazik

 

program HelloKazik(output);
begin
 writeln('Hello, Kazik!')  { оператор вывода строки }
end.

 

обзываем программу, начинаем ее, выводим на консоль хелоу казик, изавершаем программу

 

Как видно, паскаль слизан полностью с руби

 

Такие дела, ребята-малята. Оставайтесь с нами, и вы узнаете как написать свою ОС на паскале за 24 часа.

 

Урок номер 1: http://prodota.ru/fo...

Урок номер 2: http://prodota.ru/fo...0#entry10717737

ващето паскаль слизан с c#

хахха в голос с названия топика )))

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

Пишем свою ОС с блекджеком и казиками

 

ФУНКЦИИ И ПРОЦЕДУРЫ

а будут разбираться циклы со всякими условиями?

циклы уже были

ващето паскаль слизан с c#

ващето паскаль слизан с c#

не разводите срачь, это топик казика про паскаль

тупняша не шарит

2пой, почему я не могу записать данные в файл?

кароч делаю type sotrudniki= record

потом fsot: file of sotrudniki

но в файл от записывать почему то не хочет

procedure vvod;
begin
writeln('Введите количество работников в фирме');
 readln(n);
 assign(Fsot, 'c:\sot.dat');
 rewrite(Fsot);
 for i := 1 to n do
 begin
  write('Введите фамилию работника: ');
  readln(sot[i].fam);
  write('Введите имя работника: ');
  readln(sot[i].im);
  write('Введите отчество работника: ');
  readln(sot[i].ot);
  write('Введите адрес: ');
  readln(sot[i].ad);
  write('Введите дату рождения: ');
  readln(sot[i].dt_r);
  write('Введите должность: ');
  readln(sot[i].dol);
   end; close(Fsot); end;

У МЕНЯ НОСТАЛЬЖИ С ТРЕДА

ПРОСТО НОСТАЛЬЖИ)

я кстати дипломник прогу тренажер на делфи пишу. хотел на с++

но по некоторым причинам выбрал делфи)

унитазик, ты в этом куске кода открываешь, перезаписываешь файл

вводишь n блоков данных о человеках в ПАМЯТЬ, не в файл

закрываешь файл

красава

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

Сегодня тех задание прислали.

Какие подводные камни?

унитазик, ты в этом куске кода открываешь, перезаписываешь файл

вводишь n блоков данных о человеках в ПАМЯТЬ, не в файл

закрываешь файл

красава

всё правильно сделал

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

Сегодня тех задание прислали.

Какие подводные камни?

А зачем на нем писать, можете ответить ?

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

Сегодня тех задание прислали.

Какие подводные камни?

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

Сегодня тех задание прислали.

Какие подводные камни?

Rab:

SozdatDokyment();

Kancelyariya:

Obrabotka_dokymenta();

Buhgalter:

Podpis(buh);

Direktor:

Podpis(dir);

GOTO Rab;

GOTO Kancelyariya;

GOTO Buhgalter;

GOTO Direktor;