Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Программирование на языке Pascal

Подписаться Бесплатная «Золотая» новостная рассылка . Подписчиков 2.943 RSS
←   Декабрь 2009   →
 1
 2
 3
 4
04.12.2009
00:43:37
18:42:06
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
16.12.2009
02:11:34
20:26:46
17
18
19
20
21
22
23
24
25
26
27
28
29
29.12.2009
01:36:43
09:42:26
30
31


За последние 60 дней ни разу не выходила


Сайт рассылки: http://prog.rusfaq.ru/pascal
Открыта: 14-03-2002

Автор
Калашников О.А.

Статистика

2.943 подписчиков
0 за неделю
←   Все выпуски   →

RFpro.ru: Программирование на языке Pascal


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный платный хостинг на базе Windows 2008

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Чемпионы рейтинга экспертов в этой рассылке

_Ayl_
Статус: Студент
Рейтинг: 1443
∙ повысить рейтинг » 		Boriss
Статус: Академик
Рейтинг: 1336
∙ повысить рейтинг » 		Micren
Статус: Бакалавр
Рейтинг: 1162
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И ПО / Программирование / Pascal (Паскаль)

Номер выпуска:983
Дата выхода:03.12.2009, 18:00
Администратор рассылки:Калашников О.А., Руководитель
Подписчиков / экспертов:358 / 190
Вопросов / ответов:5 / 5

Вопрос № 174590: Добрый день,уважаемые эксперты!!!!Помогите пожалуйста решить 2 задачки 1) Описать функцию IsPrime(N) логического типа,возвращающую True, если целый параметр N(>1) является простым числом, и False в противном случае. Дан набор из 10 целых чисел...

Вопрос № 174593: Помогите уважаемые эксперты с задачкой: 1)Описать ф-цию подсчета кол-ва трехзначных натур.чисел,сумма цифр которых равняется n (1<=n<=27) 2)Описать процедуру нахождения длины стороны и велечин двух углов треугольника по велечине одного ...
Вопрос № 174640: Добрый день, уважаемые эксперты! Помогите решить одну задачку! Даны натур.n, вещественное число с и логический массив х из n элементов(массив одномерный). Вычислить y=c в степени к, где к – число элементов массива х, предшествующих первому по по...
Вопрос № 174641: Добрый день, уважаемые эксперты! Помогите пожалуйста с одной задачкой! Даны натуральное число n и вещественный массив из n чисел(массив одномерный). Преобразовать массив по следующему правилу: все отрицательные элементы массива перенести - в его...
Вопрос № 174642: Добрый день, уважаемые эксперты! Помогите пожалуйста с одной задачкой! Даны натуральное число n и целочисленный массив из n элементов(массив одномерный). Удалить из массива все вхождения максимального и минимального элементов.Если массив состоит ...
Вопрос № 174590:

Добрый день,уважаемые эксперты!!!!Помогите пожалуйста решить 2 задачки
1) Описать функцию IsPrime(N) логического типа,возвращающую True, если целый параметр N(>1) является простым числом, и False в противном случае. Дан набор из 10 целых чисел,больших 1. С помощью фукции IsPrime найти количество простых чисел в данном наборе.
2)Даны вещественные числа Х (|X|<1) и eps (|eps|<1).Найти значение выражения с точностью eps:
1+sqr(x)/2-1*(sqr(x)*sqr(x))/(2*4)+1*3*(sqr(x)*sqr(x)*sqr(x))/(2*4*6)-1*3*5*(sqr(x)*sqr(x)*sqr(x)*sqr(x))/(2*4*6*8)+.....
считать,что вычисления с заданной точностью останавливаются когда модуль очередного вычисленного слагаемого станет меньше eps.

Отправлен: 27.11.2009, 17:31
Вопрос задал: angel.nero, Посетитель
Всего ответов: 1
Страница вопроса »

Отвечает Колесников Иван Владимирович, 2-й класс :
Здравствуйте, angel.nero.
Решение первой задачи в приложении.

Приложение:

Ответ отправил: Колесников Иван Владимирович, 2-й класс
Ответ отправлен: 27.11.2009, 22:23

Оценка ответа: 5

Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 257006 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
    • Вам помогли? Пожалуйста, поблагодарите эксперта за это!

    Вопрос № 174593:

    Помогите уважаемые эксперты с задачкой:
    1)Описать ф-цию подсчета кол-ва трехзначных натур.чисел,сумма цифр которых равняется n (1<=n<=27)
    2)Описать процедуру нахождения длины стороны и велечин двух углов треугольника по велечине одного угла,длине противоположной стороны и длине одной стороны треугольника!

    Отправлен: 27.11.2009, 19:16
    Вопрос задал: angel.nero, Посетитель
    Всего ответов: 1
    Страница вопроса »

    Отвечает Boriss, Академик :
    Здравствуйте, angel.nero.
    Это несложное задание. На будущее совет - не помещайте два вопроса в одну форму. Трудно делить.
    Я, поскольку Вам нужны подпрограммы, все поместил в одну программу вместе с небольшими комментариями
    Одно только, для второго задания сделал не процедуру, а функцию, которая возвращает результат логического типа.
    Сами посудите: угол = 90º, а гипотенуза (противоположная сторона) короче катета (прилежащая сторона)

    Пример окна окна программы:
    Код:
    Введите целое число от 1 до 27: 4
    Число трехзначных чисел, сумма цифр которого равна 4 равно 10
    c =       3.00, betta =  53.13,  gamma = 36.87

    Приложение:

    -----
    Вывод - то место в тексте, где вы устали думать

    Ответ отправил: Boriss, Академик
    Ответ отправлен: 28.11.2009, 19:35

    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 257036 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
    • Вам помогли? Пожалуйста, поблагодарите эксперта за это!

    Вопрос № 174640:

    Добрый день, уважаемые эксперты! Помогите решить одну задачку!
    Даны натур.n, вещественное число с и логический массив х из n элементов(массив одномерный). Вычислить y=c в степени к, где к – число элементов массива х, предшествующих первому по порядку элементу, имеющему значение false (если все значения имеют true то принять к= n)

    Отправлен: 28.11.2009, 16:46
    Вопрос задал: angel.nero, Посетитель
    Всего ответов: 1
    Страница вопроса »

    Отвечает Максим Юрьевич, 7-й класс :
    Здравствуйте, angel.nero.
    Решение в приложении.
    Компилятор Borland Pascal 7.0

    Приложение:

    Ответ отправил: Максим Юрьевич, 7-й класс
    Ответ отправлен: 30.11.2009, 10:46

    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 257101 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
    • Вам помогли? Пожалуйста, поблагодарите эксперта за это!

    Вопрос № 174641:

    Добрый день, уважаемые эксперты! Помогите пожалуйста с одной задачкой!
    Даны натуральное число n и вещественный массив из n чисел(массив одномерный). Преобразовать массив по следующему правилу: все отрицательные элементы массива перенести - в его конец, все положительные - в начало ,все равные нулю – в середину, сохраняя исходное взаимное расположение, как среди отрицательных, так среди и всех остальных. Вспомогательный массив не использовать!!!

    Отправлен: 28.11.2009, 17:01
    Вопрос задал: angel.nero, Посетитель
    Всего ответов: 1
    Страница вопроса »

    Отвечает Зенченко Константин Николаевич, Модератор :
    Здравствуйте, angel.nero.

    Смотрите приложение.
    Массив создается с помощью генератора случайных чисел, поэтому в программе есть строчки:
    a[4]:=0;
    a[8]:=0;
    Они вводят дополнительные нули.
    Реализована ленивая сортировка.
    Удачи!

    Приложение:

    -----
    Итерация от человека. Рекурсия — от Бога. — Л. Питер Дойч

    Ответ отправил: Зенченко Константин Николаевич, Модератор
    Ответ отправлен: 02.12.2009, 20:43
    Украина, Киев
    Тел.: +38-097-953-66-19
    Адрес: Украина, Киев

    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 257213 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
    • Вам помогли? Пожалуйста, поблагодарите эксперта за это!

    Вопрос № 174642:

    Добрый день, уважаемые эксперты! Помогите пожалуйста с одной задачкой!
    Даны натуральное число n и целочисленный массив из n элементов(массив одномерный). Удалить из массива все вхождения максимального и минимального элементов.Если массив состоит из одинаковых элементов, выдать об этом сообщение.

    Отправлен: 28.11.2009, 17:01
    Вопрос задал: angel.nero, Посетитель
    Всего ответов: 1
    Страница вопроса »

    Отвечает LfiN, 9-й класс :
    Здравствуйте, angel.nero.
    День добрый!
    Программа проверена на FREE PASCAL. Комментарии в самой программе.
    Рад был помочь!
    Код:
    program q174642;
    var n,i,k,j:byte;
        m,m0:array [1..255] of integer;
        max,min:integer;
    begin
         write('Введите натуральное
число n: ');
         readln(n);

         for i:=1 to n do  {цикл для заполнения массива}
          begin
               write('m[',i,']=');
               readln(m[i]);
          end;

         {Первоначально максимальное и минимальное значения
         равны первому элементу массива}
         max:=m[1];
         min:=m[1];
         for i:=2 to n do {цикл для нахождения max и min значений}
          begin
               if m[i]>max then max:=m[i];
       
         if m[i]<min then min:=m[i];
          end;

         writeln;
         writeln('max=',max);
         writeln('min=',min);
         writeln;

         {если значения между собой равны, то остальные элементы массива тоже
         между собой равны}
         if max=min then writeln('Массив состоит из одинаковых элементов!')
         else begin
         {если такого не происходит, то записываем в массив m0 элементы
         массива m, но без max и min значений}
         k:=0;
      
  for i:=1 to n do
          begin
               if (m[i]<>max)and(m[i]<>min) then m0[i-k]:=m[i]
               else inc(k);
          end;
         write('массив без max и min: ');
         for j:=1 to i-k do {выводим получившейся массив}
          write(m0[j],',');
         end;

         writeln;
         writeln('Для завершения нажмите ENTER...');
         readln;

    end.

    Ответ отправил: LfiN, 9-й класс
    Ответ отправлен: 29.11.2009, 14:32

    Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 257065 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
    • Вам помогли? Пожалуйста, поблагодарите эксперта за это!

    Оценить выпуск »
    Нам очень важно Ваше мнение об этом выпуске рассылки!

    Задать вопрос экспертам этой рассылки »

    Скажите "спасибо" эксперту, который помог Вам!

    Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
    на короткий номер 1151 (Россия)
    Номер ответа и конкретный текст СМС указан внизу каждого ответа.

    Полный список номеров »

    * Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи. (полный список тарифов)
    ** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
    *** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.

    © 2001-2009, Портал RFpro.ru, Россия
    Авторское право: ООО "Мастер-Эксперт Про"
    Автор: Калашников О.А. | Программирование: Гладенюк А.Г.
    Хостинг: Компания "Московский хостер"
    Версия системы: 2009.6.12 от 30.11.2009
    В избранное