freepascal.ru

Код: Выделить всё

z:=sqr(sqr(x)-y)-((6*x*y)/(sqrt(y-x)+abs(x)));

tema писал(а):Условный цикл.

Paster Fob писал(а):

Код: Выделить всё

z:=sqr(sqr(x)-y)-((6*x*y)/(sqrt(y-x)+abs(x)));

nikolay61 писал(а):Используя mod i div нужно перевернуть 93 на 39.

Код: Выделить всё

var a:byte;
begin
  a:=93;
  writeln(a);
  a:=(a mod 10*10)+(a div 10);
  writeln(a);
  readln
end.

Paster Fob писал(а):

nikolay61 писал(а):Используя mod i div нужно перевернуть 93 на 39.

Код: Выделить всё

var a:byte;
begin
  a:=93;
  writeln(a);
  a:=(a mod 10*10)+(a div 10);
  writeln(a);
  readln
end.

Знаю отличников, которые считают, что на уроках математики не с глаголами запросто можно писать и слитно...

vada писал(а):ЗЫ. Подозреваю что сообщение компилятора на русском "Синтаксическая ошибка" мало изменит ситуацию, т.к ученики не знают понятия синтаксис, семантика, конечный автомат...

Максим писал(а):nouvelle
В FPC 2.6.0 сообщения компилятора уже переведены на русский. Насколько я понимаю, русский перевод можно включить, отредактировав файл fpc.cfg.

Vapaamies писал(а):Во, я уже могу ответить на этот вопрос. Смотрите приложения в книге Олега "Песни о Паскале" из соседней темы.

vada писал(а):в боевых условиях синус может принимать значение два, а иногда, если очень тяжелый бой, то и три.