Re: http://otvet.mail.ru/question/26000099/

помогите пожалуста написать и отладить прогу на паскале....задание внутри...

Для начала немного определений...

Табулирование функции – это вычисление значений функции, когда параметр этой функции изменяет значение от некоторого начального до некоторого конечного с определенным шагом. В результате табулирования получают таблицу, которую удобно обрабатывать и исследовать с помощью табличного процессора.
Необходимость в табулировании возникает при решении достаточно широкого круга задач. Например, создав таблицу значений функции, можно построить ее график, определить максимальное или минимальное значение функции на отрезке и т.п.

теперь к задаче:

это обычный цикл с заданным шагом, т.к. for у нас c шагом =1, то мы будем использовать while с заданым шагом

var
i: integer;

begin

i:= 10;

while i <= 100 do

begin

...

i:= i + 5;

end;

end.

2) ну а полный вариант решения тут

Re: http://otvet.mail.ru/question/25995402/

помогите выполнить задание в паскале*** внутри выложил

1) ну тут как всегда - сначала выполняем сначала операции в скобочках, под знаком корня и т.д.

2) минимальное значение находим так

if f < a then begin
   if f < s then begin
       writeln('f = ', f);
   end;
end else begin
   if a < s then begin
       writeln('a = ', a);
   end else begin
       writeln('s = ', s);
   end;
end

3) аналогично этому и максимальное значение

4) форматированный вывод до 3 знаков после запятой осуществляется с помощью
writeln('x = ', X:5:3);

5) ну и решение полностью тут

Re: Как решить данную задачу на javascript?

Даны целочисленные координаты точки на плоскости. Если точка совпадает с началом координат, то вывести 0. Если точка не совпадает с началом координат, но лежит на оси ОХ или ОY, то вывести соответсвтенно 1 или 2.
Если точка не лежит на координатных осях, то вывести 3.

Тут нужно отметить несколько моментов.

1) как получить информацию от пользователя? предлагаю использовать <input>

2) как получить команду на вычисление? используем <button> с обработкой onclick

3) как выводить результаты? изпользуем <span>

4) как получить то что ввел польователь?

есть такая функция как getElementById, соотв. задаем каждому поле свой id и получаем нужный элемент, но тут у нас на выходе текст - поэтому преобразовываем его к числу используя parseInt()

5) ну а дальше - обычные проверки с if else - полное решение смотри тут

Re: Pascal

и тут еще одну надо я ее написал, но не полностью подскажите:

Дана последовательность из 100 целых чисел,определить кол-во чисел в наиболее длинной последовательности.Из подряд идущих чилел.

Порассуждаем.

0) не забываем заполнить массив значениями - прежде чем работать с ним...

например случайными числами от 0 до 100

var

A: array [0..99] of integer

i: integer;

begin

for i:=0 to 99 do A[i] := random(100)

1) как определить идут ли числа последовательно?

если значение текущего элемента массива - 1 равно предыдущему элементу массива - тогда можно считать что числа идут последовательно и увеличить счётчик

if A[i]-1 = A[i-1] then ...

2) иначе надо проанализировать принимал ли наш счётчит большее значение чем полученное - если нет то присвоить ему новое значение - для этого мы определим новую переменную max_counter

var    max_counter: integer;

begin    counter := 1;    max_counter := 1;    ...

   if counter > max_counter then max_counter := counter

4) ну и готовый пример скачиваем тут

Re: помогте написать прогу.Паскаль

вывести на экран все 4-значые числа, где в составе чила имеется 3 одинаковые цифры(1121, 1112,2111,1111) определите их количество.

заранее спасибо! и ещё...это очень срочно....

1) сначала надо перебрать все 4-х значные числа

var
  n: integer;

begin
  for n:=1000 to 9999 do
  begin
     {тут что-то делать с n-тым числом}
  end;
end.

2) как-то надо определить что число содержит одинаковые цифры

ну тут сначала надо из числа извлечь его составляющие
для четырёх значного числа нужно поделить его на 10 три раза, т.е.
например для числа 2346 нужно сделать такое:

2346 \ 10 = 234 и остаток - 6 - первая цифра
234 \ 10 = 23 и остаток 4 - вторая цифра
23 \ 10 = 2 и остаток 3 - третья цифра
2 - и есть наша четвёртая цифра

3) как-то нужно подсчитать сколько у нас каждой цифры

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

var
counters: array [0..9] of integer;
i: integer;

begin
{перед использованием обнулим их}
for i:=0 to 9 do conters[i] := 0;
...

цифры полученые в результате предыдущих вычислений будут являться индексами в этом масиве
т.е. counters[2], counters[3], counters[4], counters[6]

и при появлении каждой цифры мы увеличиваем соотв. счётчик - так counter[2] = counter[2] + 1;

3) теперь у нас есть кол-ва каждой цифры в данном числе, теперь выясним - есть ли значения хоть одного счётчика более или равное 3-м - тогда выводим число на экран

for i:=0 to 9 do
begin
 if counters[i] >2 then writeln(...);
end;

4) ну и рабочую программу можно скачать по ссылке