Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi Нужно скомбинировать код Вообще задача состоит в следующем-программа рассчитывает линейную зависимость по значениям, загружаемым из текстового файла. В результате выдается линейное уравнение вида y = ax + b, значения выводятся на график в виде точек и потом по этим точкам происходит аппроксимация. Так вот у меня есть одна задача, в которой считаются коэффициенты и другая задача, в которой есть аппроксимация, и мне их... https://www.cyberforum.ru/ delphi-beginners/ thread329668.html Определение ускорения движения заданной точки Delphi
Здравствуйте подскажите с чего следует начать при " определении ускорения движения заданной точки" вот само уравнение r=ti+t^2*j+2/3*t^3*k
Delphi При компиляции ругается на проверенный файл... https://www.cyberforum.ru/ delphi-beginners/ thread329649.html
Добрый день! Пытаюсь скомпилировать проект Delphi 2009 в Delphi XE - но при компиляции возникают ошибки в обычном месте, ругается на файл cxFilterDialog: cxFilterDialog.pas(245): E2003 Undeclared identifier: 'Null' cxFilterDialog.pas(250): E2003 Undeclared identifier: 'VarIsNull' cxFilterDialog.pas(250): E2003 Undeclared identifier: 'VarIsStr' cxFilterDialog.pas(250): E2015 Operator not...
Delphi Запретить второй запуск программы. Приложение без окон https://www.cyberforum.ru/ delphi-beginners/ thread329643.html
Сабж. Без подключения в uses компонента формы. Все примеры что находил в инете юзали окна.
Delphi Как сдвинуть курсор в TEdit на нужную позицию
Мне надо сдвинуть курсор в TEdit на нужную позицию. Программа редактирует Edit1.Text, и после программной правки надо передвинуть курсор в конец строки. Как это сделать? Решение этой проблемы сильно ускорит ввод данных в большую БД. Насколько я понимаю есть 2 пути: 1. Заставить программу думать, что нажали кнопку End 2. Разбираться как Устроен TEdit, т.е. копаться в предках объекта - ведь...
Delphi Какуро(японская головоломка) Нужно написать игру какуро. Знаю, такая тема уже поднималась, но в предыдущих обсуждениях я не нашел необходимой информации, ооп занимаюсь впервые и в delphi еще не очень разбираюсь, даже не знаю, с чего начать, потому прошу совета по реализации игры. Заранее спасибо. Что из себя представляет игра: http://ru.wikipedia.org/wiki/Какуро https://www.cyberforum.ru/ delphi-beginners/ thread329620.html
Delphi Определить, входит ли цифра в десятичную запись трехзначного числа https://www.cyberforum.ru/ delphi-beginners/ thread329599.html
1.Хватит ли в баке автомобиля бензина, чтобы доехать до ближайшей заправочной станции? 2.Составьте программу, определяющую, входит ли введенная вами цифра в десятичную запись введенного вами трехзначного числа. 3.Дано натуральное n. Вычислить: 1/11 + 1/22 + ... + 1/n n. 4.С клавиатуры вводятся N чисел. Составьте программу, которая определяет количество отрицательных, количество...
В заданный непустой текст входят цифры и буквы Delphi
Всем привет! Помогите пожалуйста составить програмы. Спасибо! 1 задача В заданный непустой текст входят цифры и букви.Визначиты, удовлетворяет данный текст таком условии: текст состоит из k букв (l <= k <= 9) за которыми следует только один символ - цифра с числом k. 2 задача Данная последовательность с менее, чем из двух чисел, за которыми следует 0. Вычислить сумму тех из них, порядковые...
Delphi Объединить два массива дано три массива с,a,b:array of integer; (n) размер массива а и (m) размер массива b как их объединить в один массив с, с размером n+m? https://www.cyberforum.ru/ delphi-beginners/ thread329542.html Delphi Макс кол-во букв в строке https://www.cyberforum.ru/ delphi-beginners/ thread329505.html
Люди,как в мемо сравнить какая из строчек имеет максимальное количество букв и при том если строк может быть большое количество,тоесть как счетчик поставить?
Delphi Правильно написать условие If
Здравствуйте. Подскажите пожалуйста, как правильно написать условие: Если image1.Top больше 200 но меньше 220, то image1.Top = 221. If image1.Top > 200 and image1.Top < 220 Then image1.Top = 221; - так не работает.
Delphi В считанном тексте подсчитать количество гласных символов https://www.cyberforum.ru/ delphi-beginners/ thread329469.html
Доброго времени суток!! у меня проблема с подсчетом количества гласных букв. просто ничего не считает, вылетает с фатальной ошибкой. поглядите кому не лень, может ошибку где найдете! Заранее, спасибо! procedure TForm1.SBOpenClick(Sender: TObject); var F : TextFile; C : Char; W : Word; glas: set of char;
28 / 28 / 5
Регистрация: 29.06.2011
Сообщений: 61
05.07.2011, 15:24 0

Вычислить сумму тех из них, порядковые номера которых являются простыми числами. - Delphi - Ответ 1818287

05.07.2011, 15:24. Показов 2076. Ответов 2
Метки (Все метки)

Лучший ответ Сообщение было отмечено gymenuk как решение

Решение

а теперь можно ещё раз задание, но только теперь нормально по русски, что бы условие можно было понять.

---
Mawrat: Перевожу:
"Визначити, удовлетворяет данный текст таком условии: ..." -> "Опредедить - удовлетворяет ли заданный текст такому условию: ..."


Добавлено через 14 часов 12 минут
1
Delphi
1
2
3
4
5
6
7
8
9
10
11
var s:string;
  read(s);
  if s[length(s)] in ['0'..'9'] then
  begin
    if (Lenght(s) - 1) = StrToInt(s[Length(s)]) then
      wrtite('good')
      else
        write('bad');
  end
    else
      write('bad');


Вернуться к обсуждению:
Вычислить сумму тех из них, порядковые номера которых являются простыми числами. Delphi
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
05.07.2011, 15:24
Готовые ответы и решения:

Дана последовательность натуральных чисел,вычислить сумму тех из них,порядковые номера которых являются простыми числами
Дана задача в Delphi: Дана последовательность натуральных чисел,вычислить сумму тех из...

Требуется вычислить и напечатать сумму тех из них, порядковые номера которых являются простыми числами. (PascalABC)
В числовую переменную вводятся произвольные числа, не равные нулю. Количество вводимых чисел...

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

Вычислить сумму чисел, порядковые номера которых являются простыми числами.
Нужно еще решение Если есть возможность решите. 24. Задана последовательность N вещественных...

2
05.07.2011, 15:24
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.07.2011, 15:24
Помогаю со студенческими работами здесь

Вычислить сумму чисел, порядковые номера которых являются простыми числами
задана последовательность N вещественных чисел, вычислить сумму чисел, порядковые номера к-х...

Вычислить сумму чисел, порядковые номера которых являются простыми числами.
Что то не могу никак решить задачу, с проверкой на простое число выскакивают косяки. Задача....

Вычислить сумму чисел, порядковые номера которых являются простыми числами.
Задана последовательность n вещественных чисел вычислить сумму чисел, порядковые номера которых...

Вычислить сумму элементов массива, порядковые номера которых являются простыми числами
Помогите решить очень нужна! Ввести с клавиатуры N различных чисел. Вычислить сумму элементов...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru