Запись (record) — это пользовательский тип данных, котоорый может содержать поля с различными типами данных, например:
type schools = (1, 2, 3, 4, 5, 6, 7, 8, 9, 10) students = record name, surname : string; age : byte; school : schools; end;
Для обращения к полям записи из главной программы необходимо разделять имя переменной типа Запись и поля, которое оно содержит, символом "." (точка). Например:
var student : students;
begin student.name := 'Иван'; student.surname := 'Пупкин'; end.
Если необходимо получить или изменить значения нескольких полей записи, то удобнее использовать конструкцию with:
begin with student do begin name := 'Вася'; surname := 'Пупкин'; age := 12; school := 5; end; end.
Если игра безошибочна, тогда первый игрок может первым ходом увеличить в 3 раза вторую кучу (2*3=6), второй не станет увеличивать эту-же на 3 т.к сразу проиграет (18>17), 1) он может увеличит первую на три, тогда второй эту же увеличит на 3 и результат 1*3(2)*3(1)=9 9+6=15, первый победит
2)первый игрок будут играть аккуратно и постоянно прибавлять по 2 во вторую кучу, поскольку и в первого "безошибочная игра", то он не станет прибавлять в 1 2 камня(1+2=3, первый умножает эту кучу на 3 и результат 6+(3*3)=15), поэтому и первый и второй будут прибавлять во вторую кучу 17=17 (что по условию не подходит), выиграл 1
Ход игры всегда решает первый, а поскольку у него ходы безошибочны, то есть просчитаны наперед, второму выиграть невозможно.
Зависать вконтактике вместо того, что работать. А если серьезно: программист пишет код и тестирует программы на разных языках программирования. Журналист печатает статьи в бумажном( с принтера) или электронном варианте, ищет газеты и журналы, с которыми он бы мог сотрудничать, через интернет. Бухгалтер обрабатывает документы в электронном формате, подсчитывает деньги с специальных программ, ведет базы данных. Юрист узнает с Интернета о новых законах. Директор осуществляет связь со своими подчиненными, ведет документацию, Преподаватель скачивает презентации, видеоролики для уроков. Доктор узнает о новинках в фармакологии, смотрит образовательные ролики для повышения квалификации. Водитель с компьютера узнает о том, какие дороги сломаны и как искать обходные пути, как правильно управлять новейшими моделями автомобилей, использует дорожные карты. Швея узнает, что сейчас в моде, ищет новые выкройки, закупает материалы. Повар ищет новые рецепты.
17=17 (что по условию не подходит), выиграл 1
type
schools = (1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
students = record
name, surname : string;
age : byte;
school : schools;
end;
Для обращения к полям записи из главной программы необходимо разделять имя переменной типа Запись и поля, которое оно содержит, символом "." (точка). Например:
var
student : students;
begin
student.name := 'Иван';
student.surname := 'Пупкин';
end.
Если необходимо получить или изменить значения нескольких полей записи, то удобнее использовать конструкцию with:
begin
with student do begin
name := 'Вася';
surname := 'Пупкин';
age := 12;
school := 5;
end;
end.