Изучаю Паскаль. Присоединяйтесь.

[CyberManiac]

Т.е., если написать 2+2, Javascript выдаст 4. А если написать '2'+'2' - выдаст '22'.

Всё, что нужно знать про JavaScript:

[Masterov]

Нет. Старый я. Слепой почти.

Я серьезно предлагаю не захламлять тему своими неверными представлениями...

Это - бездоказательное утверждение.
А где Ваша аргументация ?

То, о чём я говорю- следствие моего (более чем) 40 летнего опыта программиста/математика.
А ваши утверждения на каком опыте основаны ?

[Проходящий Кот]

Автор темы только начал изучать Паскаль.

Причём тут все новейшие  программистские штучки.
Да ещё вечный спор сионистов с пасквилянтами?

[Masterov]

Автор темы только начал изучать Паскаль.

Причём тут все новейшие  программистские штучки.
Да ещё вечный спор сионистов с пасквилянтами?

Я пытался донести до всех мысль о том, что Паскаль - плохой выбор.

Начинать учиться программированию нужно с HTML/CSS/Javascript. (Результат получается почти сразу, а это важно в начале.)

Создайте на рабочем столе текстовый файл (типа) "file.html"
Наберите в нём текст: Hello World ! (сохраните)
Два раза кликните на файле и посмотрите - что получилось.

Потом отредактируйте текст <U>Hello</U> <I>World</I> ! (сохраните)
Зайдите в браузер и обновите (Ctr R)
У ваc должно получиться Hello World !

Это - начало.
Далее: изучайте теги HTML.

[Аурипигмент]

Предлагаю для холивара создать отдельную тему и назвать её, типа: самый лучший язык программирования, или (название языка программирования)-- рулит везде и всегда.
Хотя, холивар-- пуствая трата времени. Всё-таки судить всегда будут по делам.
Тем не менее, несмотря на обилие крутых программистов, так принято считать, никто не может написать нормальную программу под Линукс для автоматического переключения раскладки клавиатуры (аналог виндового Пунто Свитчера). Была одна прога (она даже есть в репозитарии), с похожим функционалом, но она всегда работала очень глючно, а после того, как автор её забросил нету никакой надежды, что прогу допилят и будут содержать в актуальном состоянии. Я писал письмо в контору, которая делает LibreOffice, даже не получил никакого ответа. Народ на форуме говорит, что до меня кому только не писали и всё без толку. Автор Пунто Свитчера отмазался, что у него в команде нет спецов по Линуксу и не предвидется.
Вот и получается, что колличество не переходит в качество.
Ну вот, как-то так.

[Павел Васильев]

Хотя, холивар-- пуствая трата времени.

Для изучения Паскаля как раз холивар по языкам начинающим особенно полезен, можно понять преимущества и недостатки выбранного языка на примерах сравнения с другими. А иначе зайдёт какой-нибудь любитель математики, который не осилил Паскаля в школе и скажет, что лучше JavaScript  ничего в программировании нет. И никто ему аргументированно не ответит, что любитель не прав и всё, отобъёт у начинающего охоту изучать Паскаль или Дельфи.

[Павел Васильев]

Причём тут все новейшие  программистские штучки.
Да ещё вечный спор сионистов с пасквилянтами?

Правилами форума запрещено оскорблять и обзывать участников.
Вы предлагаете изучать современный язык программирования без программистских штучек? Интересный подход.

[CyberManiac]

Я пытался донести до всех мысль о том, что Паскаль - плохой выбор.

Эта мысль сломалась. Несите следующую.

Начинать учиться программированию нужно

Не нужно.

Создайте на рабочем столе текстовый файл

У меня айпад. Что куда создать?

Два раза кликните на файле

У меня айпад. Что на что два раза?

Это - начало.

У меня айпад. Квест провален.

А вот Паскаль для айпада есть. И Бейсик есть. И даже эмулятор МК-61. Ну и кто после этого "сурьёзный язык программирования"?

[Masterov]

Я пытался донести до всех мысль о том, что Паскаль - плохой выбор.

Эта мысль сломалась. Несите следующую.

Да. Сломалась. В твоей голове.
Да и голова - тоже.

А я программировать начал больше 40 лет назад (тебя тогда ещё в проекте не было), повидал на своём пути программиста/математика туву хучу языков программирования (и не только языков программирования) и знаю - с чего легче всего начать программировать.

Не тебе меня учить - как надо учиться программировать.

Впрочем... все (в молодости) - самонадеянные ослы (ты лишь подтверждаешь это правило).

Дельный тебе совет даю: слушай и "мотай на ус" то, что тебе говорят старшие товарищи.

И АЙПАД для программирования не предназначен.
АЙПАД предназначен для использования программ с простым интерфейсом.
Я не знаю ни одного программиста-профессионала, который программирует без клавиатуры.

[eabrega]

А я программировать начал больше 40 лет назад (тебя тогда ещё в проекте не было), повидал на своём пути программиста/математика туву хучу языков программирования (и не только языков программирования) и знаю - с чего легче всего начать программировать.

Не тебе меня учить - как надо учиться программировать.

Впрочем... все (в молодости) - самонадеянные ослы (ты лишь подтверждаешь это правило).

Дельный тебе совет даю: слушай и "мотай на ус" то, что тебе говорят старшие товарищи.

Кажется у вас случился хлопок мозга (на взвыв не тянет), либор мы стали свидетелями деменции программиста.
Заканчивайте с этим пожалуйста. Хотите блеснуть мега-опытом - покажите ваш код. За 40 лет опыта, явно появилось что-то чем не стыдно похвастаться, а мы посмотрим... ху-из-ху.

[Masterov]

А я программировать начал больше 40 лет назад (тебя тогда ещё в проекте не было), повидал на своём пути программиста/математика туву хучу языков программирования (и не только языков программирования) и знаю - с чего легче всего начать программировать.

Не тебе меня учить - как надо учиться программировать.

Впрочем... все (в молодости) - самонадеянные ослы (ты лишь подтверждаешь это правило).

Дельный тебе совет даю: слушай и "мотай на ус" то, что тебе говорят старшие товарищи.

Кажется у вас случился хлопок мозга (на взвыв не тянет), либор мы стали свидетелями деменции программиста.
Заканчивайте с этим пожалуйста. Хотите блеснуть мега-опытом - покажите ваш код. За 40 лет опыта, явно появилось что-то чем не стыдно похвастаться, а мы посмотрим... ху-из-ху.

Не проблема !
Я давно не программирую, но лет 15 назад (тогда IE был главный) я научил CSS в нём привязывать js-функции к обработчикам тегов.
Т.е., там (в CSS в IE) где ты пишешь color:red; мой IE понимал такую запись (в CSS) onclick:jsFun;
(для примера)

Куда тебе это выслать ?
(учти - работает только в  IE6 и более старые)

Код короткий. Написан на jsScript.
Многие пытались понять - как он это делает.
Все обломались.

Разговор с тобой закончен.

[gasha]

Влезу в вашу тему)
Пфлегер и Монтенбруг - Астрономия на персональном компьютере. Первые издания этой книги содержали исходники на Паскале.
Удаляюсь)

[LeftUser]

Короче, вот вам:



 

зы Именно так дела на самом деле и обстоят.

[Проходящий Кот]

Вот мой вариант:

Код: [Выделить]

program Z_16_7;

var Y : byte;   { номер поля по вертикали }
   X : byte;   { номер поля по горизонтали }

BEGIN
   repeat
   Write('Введите номер поля по горизонтали от 1 до 8, 0-- выход: '); Read(X);
   if X=0 then break;
   Write('Введите номер поля по вертикали от 1 до 8, 0 -- выход: '); Read(Y);
   if Y=0 then break; { выход из цикла если X или Y равны нулю }
   case X of
      1, 3, 5, 7 : case Y of
                  1, 3, 5, 7 : Writeln('Чёрное поле');
                  2, 4, 6, 8 : Writeln('Бело поле');
                else Writeln('Ошибка в Y!');
                end;
      2, 4, 6, 8 : case Y of
                  1, 3, 5, 7 : Writeln('Белое поле');
                  2, 4, 6, 8 : Writeln('Чёрное поле');
                else Writeln('Ошибка в Y!');
                end;
   else Writeln('Ошибка в X!');
   end;
   until false;   { бесконечный цикл }
   
   
END.
Получилось два вложенных CASE в CASE. Автор же в ответах, вообще, не применил CASE, а ограничился простым условным переходом:

Код: [Выделить]

var X, Y: integer;
begin
repeat
Y:=1;
Write('X= '); Readln(X);
if X=0 then break;
if (X>0) and (X<9) then begin
Write('Y= '); Readln(Y);
if Y=0 then break;
if (Y>0) and (Y<9) then begin
if ((X+Y) mod 2)=0
then Writeln('Белая клетка')
else Writeln('Черая клетка')
end else begin
Writeln('Ошибка в Y!');
end
end else begin
Writeln('Ошибка в X!');
end
until (X=0) or (Y=0);
Writeln('До встречи!');
end.

Для будущего привыкайте  создавать побольше  процедур(функций)


Вот мой вариант:

program Z_16_7+;



{$APPTYPE CONSOLE}


uses
  SysUtils;
Procedure one;

var Y : byte;   { номер поля по вертикали }
   X : byte;   { номер поля по горизонтали }

BEGIN
   repeat
   Write('Введите номер поля по горизонтали от 1 до 8, 0-- выход: '); Read(X);
   if X=0 then break;
   Write('Введите номер поля по вертикали от 1 до 8, 0 -- выход: '); Read(Y);
   if Y=0 then break; { выход из цикла если X или Y равны нулю }
   case X of
      1, 3, 5, 7 : case Y of
                  1, 3, 5, 7 : Writeln('Чёрное поле');
                  2, 4, 6, 8 : Writeln('Бело поле');
                else Writeln('Ошибка в Y!');
                end;
      2, 4, 6, 8 : case Y of
                  1, 3, 5, 7 : Writeln('Белое поле');
                  2, 4, 6, 8 : Writeln('Чёрное поле');
                else Writeln('Ошибка в Y!');
                end;
   else Writeln('Ошибка в X!');
   end;
   until false;   { бесконечный цикл }
   end:
BEGIN;
one;
    { TODO -oUser -cConsole Main : Insert code here }
END.

[eabrega]

Куда тебе это выслать ?
(учти - работает только в  IE6 и более старые)

Ссылку на GitHub тут опубликуйте или архивом прикрепите к сообщению. Ничего сложного.

[Masterov]

Куда тебе это выслать ?
(учти - работает только в  IE6 и более старые)

Ссылку на GitHub тут опубликуйте или архивом прикрепите к сообщению. Ничего сложного.

У тебя ящик почтовый есть ?
(лениво разбираться в в приблудах, которые ты предлагаешь)

[Павел Васильев]

Напомнило.

Такой кондовый старинный Паскаль а ля 80-х. Уже в конце 90-х прошлого века когда к нам на работу приходили устраиваться программисты с таким стилем написания программ, то таких сразу отправляли подальше. Почему? А потому, что сразу видно - программист не только турбо-паскаль не освоил (не говоря уже о турбо си), но и про требования к форматированию в Delphi не слыхивал. Значит не знает среды IDE, средств отладки и библиотеки VCL и т.п., придётся обучать минимум год.  Посмотрите на исходники RAD Studio и сделайте  вывод как надо правильно писать программы. И да, конечно, если у вас в работе то наши локализованные для бухгалтерии входные данные, то  международные астрономические каталоги, то лучше в конце главной формы программы вставить (не знаю есть ли в Лазарусе)

initialization
  FormatSettings.DecimalSeparator := '.';
finalization
  FormatSettings.DecimalSeparator := ',';

[Проходящий Кот]

По поводу форматирования ---- вам шашечки или ехать?
Кроме того, при массированном использовании  ООП , процедуры становятся маленькими и эта проблема  исчезает.....

[Masterov]

Влезу в вашу тему)
Пфлегер и Монтенбруг - Астрономия на персональном компьютере. Первые издания этой книги содержали исходники на Паскале.
Удаляюсь)

Я начинал программировать тогда, когда мы  дырявили (лезвием бритвы) и заклеивали дырки в перфокартах, корифеи писали свои программы в кодах.

Вернёмся к перфокартам ?

[eabrega]

У тебя ящик почтовый есть ?
(лениво разбираться в в приблудах, которые ты предлагаешь)

Уже бы давно личным сообщением отправили на форуме, чему эта комедия?
Вот ящик: hair-head@bk.ru