программа - Страница 2 - ФОРУМ ПОСТУПИМ.РУ
Главная
Поиск репетитора
Коллективный блог
публикаций
Форум (обсуждаем ЕГЭ 2020)
тем и сообщений
Для учебы




Войти
или
Зарегистрироваться
Новые сообщения · Участники · Правила форума · Поиск по форуму · RSS
  • Страница 2 из 2
  • «
  • 1
  • 2
ФОРУМ ПОСТУПИМ.РУ » ОБЩЕНИЕ » Помогаем друг другу » программа (помогите написать прогу)
программа
andreichДата: Воскресенье, 2009-11-01, 3:08 PM | Сообщение # 16
Аспирант
Группа: Проверенные
Сообщений: 484
Репутация: 60
Награды: 7
Замечания: 0%
Статус: Offline
Город: Екатеринбург
блин у меня 3 дня не было авторизации на форуме..не мог зайти под своим ником...ппц просто..но зато у меня было время написать программу,которая работает хорошо) оцените
Прикрепления: awep111.pas (1.0 Kb)



июнь 2009-мы творили чудеса!
 
kykcДата: Воскресенье, 2009-11-01, 6:11 PM | Сообщение # 17
Академик
Группа: Проверенные
Сообщений: 1237
Репутация: 1175
Награды: 111
Замечания: 100%
Статус: Offline
Quote (andreich)
andreich

ты на чем это пишиш? чет все незнакомое, хз что это
 
andreichДата: Воскресенье, 2009-11-01, 7:38 PM | Сообщение # 18
Аспирант
Группа: Проверенные
Сообщений: 484
Репутация: 60
Награды: 7
Замечания: 0%
Статус: Offline
Город: Екатеринбург
это на паскале)) а что не знакомо то?? все там нормально


июнь 2009-мы творили чудеса!
 
kykcДата: Воскресенье, 2009-11-01, 8:35 PM | Сообщение # 19
Академик
Группа: Проверенные
Сообщений: 1237
Репутация: 1175
Награды: 111
Замечания: 100%
Статус: Offline
дык, а нафига тебе вообще нужен интегер?, нафига А? небудит работать пока неизмениш
 
andreichДата: Воскресенье, 2009-11-01, 8:43 PM | Сообщение # 20
Аспирант
Группа: Проверенные
Сообщений: 484
Репутация: 60
Награды: 7
Замечания: 0%
Статус: Offline
Город: Екатеринбург
она работает )))

Добавлено (2009-11-01, 8:43 Pm)
---------------------------------------------
kykc, ты вообще чего то программы докапался..она 100% рабочая,если ты вводишь чила больше чем в интежере можно то понятно,что она не будет работать



июнь 2009-мы творили чудеса!
 
kykcДата: Понедельник, 2009-11-02, 9:31 AM | Сообщение # 21
Академик
Группа: Проверенные
Сообщений: 1237
Репутация: 1175
Награды: 111
Замечания: 100%
Статус: Offline
Quote (andreich)
kykc, ты вообще чего то программы докапался..она 100% рабочая,если ты вводишь чила больше чем в интежере можно то понятно,что она не будет работать

дык токда накуй нужен лонгинт? вот к примеру ввожу 65555 и получаю 19, весь итегер мешает, хоть ворд ставишь все равно 19, работает только с лонгинтом
 
andreichДата: Понедельник, 2009-11-02, 11:26 AM | Сообщение # 22
Аспирант
Группа: Проверенные
Сообщений: 484
Репутация: 60
Награды: 7
Замечания: 0%
Статус: Offline
Город: Екатеринбург
kykc, я не знаю как он у тебя выдает 19..у меня 5 выдает.у тебя видимо глюк какой то...... вот и все XD? программа работает и ничего против тут не скажешь, если у тебя что то не так то видимо проблемы не в программе,проверяли люди весьма умные и разбирающиеся в этом


июнь 2009-мы творили чудеса!
 
andreichДата: Вторник, 2009-11-10, 6:28 PM | Сообщение # 23
Аспирант
Группа: Проверенные
Сообщений: 484
Репутация: 60
Награды: 7
Замечания: 0%
Статус: Offline
Город: Екатеринбург
поднимаю тему эту, помогите переделать программу, заменив цикл for +if на другой,чтобы break не было, я что то не могу....
Прикрепления: 4862972.pas (1.0 Kb)



июнь 2009-мы творили чудеса!
 
redberretДата: Вторник, 2009-11-10, 7:52 PM | Сообщение # 24
Магистр
Группа: Проверенные
Сообщений: 211
Репутация: 8
Награды: 5
Замечания: 0%
Статус: Offline
Город: Kazan City
for i := 2 to trunc(sqrt(x)) do
if x mod i = 0 then begin
tf := True;
break;
Этот?
 
andreichДата: Вторник, 2009-11-10, 9:44 PM | Сообщение # 25
Аспирант
Группа: Проверенные
Сообщений: 484
Репутация: 60
Награды: 7
Замечания: 0%
Статус: Offline
Город: Екатеринбург
да, и чтобы работало еще))


июнь 2009-мы творили чудеса!
 
redberretДата: Среда, 2009-11-11, 2:10 PM | Сообщение # 26
Магистр
Группа: Проверенные
Сообщений: 211
Репутация: 8
Награды: 5
Замечания: 0%
Статус: Offline
Город: Kazan City
i:=2;
tf:=true;
While (i<trunc(sqrt(x) and tf) do
begin
if x mod i <> 0 then
tf:=false;
inc(i);
end;


Сообщение отредактировал redberret - Среда, 2009-11-11, 2:10 PM
 
bordaperДата: Суббота, 2009-11-14, 10:21 AM | Сообщение # 27
Студент
Группа: Пользователи
Сообщений: 79
Репутация: 1
Награды: 0
Замечания: 0%
Статус: Offline
Город: Новокузнецк
Помогите!!! Паскаль давно был уже ничего не помню!!!

Добавлено (2009-11-14, 10:21 Am)
---------------------------------------------
нужна просто программа,график не нужен

Прикрепления: 5180457.jpg (104.4 Kb)
 
redberretДата: Суббота, 2009-11-14, 1:12 PM | Сообщение # 28
Магистр
Группа: Проверенные
Сообщений: 211
Репутация: 8
Награды: 5
Замечания: 0%
Статус: Offline
Город: Kazan City
Ничего не видно.
 
ФОРУМ ПОСТУПИМ.РУ » ОБЩЕНИЕ » Помогаем друг другу » программа (помогите написать прогу)
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:








© 2006 - 2023 Поступим.ру Информация:
О проекте
Контакты

Регистрация на сайте
Статистика сообщества
Пользовательское соглашение
Разделы:
Поиск репетитора
Форум сообщества
Коллективный блог
Материалы для учебы
ЕГЭ 2021
RSS:
RSS форума
RSS блога