| 
				
				нужно создать программу
				 | 
 | 
| NoGiN | Дата: Суббота, 20 Марта 2010, 14:08 | Сообщение # 1 |  
 
почетный гость 
Сейчас нет на сайте 
 
 | мне нужно создать программу такого типа:выбираешь 2 числа(скажем 7 и 10)нажимаем кнопочку(скажем окей)и нам выдают число от 7 до 10(7,8,9,10)   и так с другими числами)и когда рпосчитал всё что нужно можно нажать на кнопочку(скажем рестарт)и всё опять:выбираешь 2 числа и.т.д   как я уже сказал тому кто создаст + в репу)или даже 2))
  Охотясь на чудовищ, опасайся сам стать чудовищем. И глядя в Бездну помни, что и Бездна смотрит в тебя.        помоги им вырасти(кликни на драконов)и тогда они будут очень счастливы и дадут тебе возможность завести себе такого же!)
 
 Сообщение отредактировал NoGiN - Суббота, 20 Марта 2010, 14:13  |  
| 
 | 
 |    | 
| Droideka | Дата: Суббота, 20 Марта 2010, 14:40 | Сообщение # 2 |  
| 
 был не раз 
Сейчас нет на сайте 
 
 | На каком языке реализовать то надо?
 |  
| 
 | 
 |    | 
| Master_Chief | Дата: Суббота, 20 Марта 2010, 14:53 | Сообщение # 3 |  
 
Shoot Space creator 
Сейчас нет на сайте 
 
 | NoGiN,   простейший пример программирования...   Droideka, присоединяюсь к вопросу
 
  
 |  
| 
 | 
 |    | 
| Vinchensoo | Дата: Суббота, 20 Марта 2010, 14:55 | Сообщение # 4 |  
 
Злобный социопат с комплексом Бога 
Сейчас нет на сайте 
 
 | Консольного типа программа, реализовывается в pascal:   Code uses crt;   var x,y,z:integer;   begin   clrscr;   writeln('введи х,у');   readln(x,y);   z:=random(abs(x-y)+1);   if x>=y then writeln(x-z)   else writeln(y-z);   readln;   end.     Графику можно сделать на гамаке.
 
  
 |  
| 
 | 
 |    | 
| Droideka | Дата: Суббота, 20 Марта 2010, 15:02 | Сообщение # 5 |  
| 
 был не раз 
Сейчас нет на сайте 
 
 | как-то сложно все это...разве нельзя использовать цикл for?    Code    for i:=x to y do    begin       write(i, ' ');     i:=i+1;   end;       насчет i:=i+1 неуверен, но так возможно проще. 
 |  
| 
 | 
 |    | 
| simtiko | Дата: Суббота, 20 Марта 2010, 15:18 | Сообщение # 6 |  
 
почти ветеран 
Сейчас нет на сайте 
 
 | Может лучше так?    Code uses crt;   var a,b:integer;   begin   readln(a,b);   repeat   writeln(a);   a:=a+1;   until a=b+1;   end.    Droideka, Не пойдет...   Vinchensoo,   
 
 Сообщение отредактировал simtiko - Суббота, 20 Марта 2010, 15:22  |  
| 
 | 
 |    | 
| zuban32 | Дата: Суббота, 20 Марта 2010, 15:32 | Сообщение # 7 |  
 
частый гость 
Сейчас нет на сайте 
 
 | Вот, сделал, качай ссылка   Или, если хочешь, здесь код напишуДобавлено (20.03.2010, 15:30) --------------------------------------------- Короче, вот исходный код    Code #include "stdafx.h"   #include <iostream>   #include <conio.h>   using namespace std; 
   int _tmain(int argc, _TCHAR* argv[])   {   setlocale( LC_ALL, "Russian");   mainmenu:   system("cls");   int a,b,c,d;   cout << "Введите первое число: ";   cin >> a;   cout << "Введите второе число: ";   cin >> b;   for (c = a; c<= b; c++)   {    cout << c << " ";   }   cout << "\n" << "0 - другие числа, 1 - выход ";   cin >> d;   switch(d)   {   case 0: goto mainmenu;    break;   case 1:return 0;    break;   default: goto mainmenu;    break;   }   } Добавлено (20.03.2010, 15:32) --------------------------------------------- Жду +   
  Процесс не важен, важен результат.
 |  
| 
 | 
 |    | 
| MiniTiv | Дата: Суббота, 20 Марта 2010, 16:03 | Сообщение # 8 |  
 
ITS Kurt 
Сейчас нет на сайте 
 
 | zuban32 C++...   Норм))
  Создай свою программу без программирования!   Антиграни...(читаем, вступаем для души)
 |  
| 
 | 
 |    | 
| Vinchensoo | Дата: Суббота, 20 Марта 2010, 16:41 | Сообщение # 9 |  
 
Злобный социопат с комплексом Бога 
Сейчас нет на сайте 
 
 |    я писал из соображений, что товарищу нужно 1 число из заданных рамок.   Если все числа, то вообще не вижу сложности
 
  
 |  
| 
 | 
 |    | 
| NoGiN | Дата: Суббота, 20 Марта 2010, 18:53 | Сообщение # 10 |  
 
почетный гость 
Сейчас нет на сайте 
 
 | zuban32, он выдаёт ошибку)так что место для + ещё в силе)   Vinchensoo, у тебя ошибка в Code writeln('введи х,у');  он не распознаёт writeln
  Охотясь на чудовищ, опасайся сам стать чудовищем. И глядя в Бездну помни, что и Бездна смотрит в тебя.        помоги им вырасти(кликни на драконов)и тогда они будут очень счастливы и дадут тебе возможность завести себе такого же!)
 |  
| 
 | 
 |    | 
| Master_Chief | Дата: Суббота, 20 Марта 2010, 19:38 | Сообщение # 11 |  
 
Shoot Space creator 
Сейчас нет на сайте 
 
 | Quote (NoGiN) он не распознаёт writeln      кто?    А вообще напиши-ка пожалуйста, дружок, на каком ЯП тебе конкретно надо и на какую платформу. А то тут тебе предложили аж 4 варианта реализации этой программы на 2 языках программирования 
 
  
 |  
| 
 | 
 |    | 
| simtiko | Дата: Суббота, 20 Марта 2010, 19:43 | Сообщение # 12 |  
 
почти ветеран 
Сейчас нет на сайте 
 
 |    Наверное компилятор... 
 |  
| 
 | 
 |    | 
| Master_Chief | Дата: Суббота, 20 Марта 2010, 19:46 | Сообщение # 13 |  
 
Shoot Space creator 
Сейчас нет на сайте 
 
 | Quote (simtiko) Наверное компилятор...      это многое объясняет  
 
  
 |  
| 
 | 
 |    | 
| NoGiN | Дата: Суббота, 20 Марта 2010, 20:03 | Сообщение # 14 |  
 
почетный гость 
Сейчас нет на сайте 
 
 | я если честно в этом мало что смыслю(в языках))   язык любой))можно и C++))   вот как это должно быть):открываешь приложение в небольшом окошечке)и вводишь 2 числа и так далее как я объяснял в 1-ом посте)   мне надо без выпендриваний и всякой другой чепухи)
  Охотясь на чудовищ, опасайся сам стать чудовищем. И глядя в Бездну помни, что и Бездна смотрит в тебя.        помоги им вырасти(кликни на драконов)и тогда они будут очень счастливы и дадут тебе возможность завести себе такого же!)
 |  
| 
 | 
 |    | 
| simtiko | Дата: Суббота, 20 Марта 2010, 20:16 | Сообщение # 15 |  
 
почти ветеран 
Сейчас нет на сайте 
 
 | NoGiN, Вот держи - Скачать файл Chto-to-tam.rar
 |  
| 
 | 
 |    | 
 | 
| VarXdar | Дата: Суббота, 20 Марта 2010, 20:40 | Сообщение # 17 |  
| 
 Работник Ubisoft 
Сейчас нет на сайте 
 
 | Вот мой листинг. Pascal   Проверку думаю сможешь сам сделать.   Code   var     m,n,z:integer;   begin     writeln('Vvedite m,n');     readln(m,n);     Randomize;     z:=random(n-m)+m;     writeln(z);     readln   end.     Никаких плюсов не надо, задача елементарная. 
 |  
| 
 | 
 |    | 
| simtiko | Дата: Суббота, 20 Марта 2010, 20:43 | Сообщение # 18 |  
 
почти ветеран 
Сейчас нет на сайте 
 
 | VarXdar,   1.Твой код не работает.   2. Человеку нужен экзешник.
 |  
| 
 | 
 |    | 
| zuban32 | Дата: Суббота, 20 Марта 2010, 20:49 | Сообщение # 19 |  
 
частый гость 
Сейчас нет на сайте 
 
 | вот ссылка, все работает, не надо гнать на меня)   Ссылка для скачивания
  Процесс не важен, важен результат.
 |  
| 
 | 
 |    | 
| Lgunchik | Дата: Суббота, 20 Марта 2010, 20:58 | Сообщение # 20 |  
 
постоянный участник 
Сейчас нет на сайте 
 
 | неа у мну не робит  
  >
 |  
| 
 | 
 |    |