Другие языки программирования и технологии
Программисты, помогите, пожалуйста!
Нужно сгенерировать числа в порядке увеличения, начиная с 00000001 и заканчивая 099999999.Знаю, что глупость какая-то, но можно что-то придумать?
счетчик сделай, чтоб числу +1 добавляло.
Вот нарыл у себя на паскале теорию:
Оператор цикла с предусловием:
WHILE <логическое выражение> DO WHILE I<9 DO
BEGIN BEGIN
[последовательность действий ] S:=S+I;
I:=I+1
END; END;
Оператор цикла с послеусловием:
REPEAT REPEAT
[последовательность действий ] S:=S+I;
I:=I+1;
UNTIL <логическое выражение> UNTIL I>9;
Оператор цикла с параметром:
1. FOR <параметр> := <начальное значение> TO <конечное значение> DO
BEGIN
[ последовательность действий]
END;
2. FOR <параметр> := <начальное значение> DOWNTO <конечное значение>DO
BEGIN
[ последовательность действий]
END;
Вот нарыл у себя на паскале теорию:
Оператор цикла с предусловием:
WHILE <логическое выражение> DO WHILE I<9 DO
BEGIN BEGIN
[последовательность действий ] S:=S+I;
I:=I+1
END; END;
Оператор цикла с послеусловием:
REPEAT REPEAT
[последовательность действий ] S:=S+I;
I:=I+1;
UNTIL <логическое выражение> UNTIL I>9;
Оператор цикла с параметром:
1. FOR <параметр> := <начальное значение> TO <конечное значение> DO
BEGIN
[ последовательность действий]
END;
2. FOR <параметр> := <начальное значение> DOWNTO <конечное значение>DO
BEGIN
[ последовательность действий]
END;
Гисалиф
Где его сделать?
чисел начинающихся рядом нулей не существует.
это комбинация цифр - не более.
это комбинация цифр - не более.
Юрий Панов
код пишется легко
размер получаемого текстового файла с номерами в один столбик весит почти 86М
в упакованном в архив виде всего 275К
размер получаемого текстового файла с номерами в один столбик весит почти 86М
в упакованном в архив виде всего 275К
Да хоть в том же экселе.. . На руках нет экселя чтобы сказать как, но называется это "Прогрессия"
for (int i = 1; i <= 9999999; i++)
{
// TODO: i - твое число
}
{
// TODO: i - твое число
}
Program p1;
Var
i : Integer;
Begin
for i:=1 to 99999999 do
Writeln('i=',i);
End.
Язвк, Pascal.
Var
i : Integer;
Begin
for i:=1 to 99999999 do
Writeln('i=',i);
End.
Язвк, Pascal.
на каком языке?
Дурацкая постановка задачи
i++ уже генератор отвечающий всем условиям поставленной задачи.
i++ уже генератор отвечающий всем условиям поставленной задачи.
если нужно с нулями, то это видимо строки
в делфи примерно так:
var
i, j: Integer;
s: String;
begin
for i:=0 to 9999999 do
begin
s:='';
for j:=1 to 9-Length(IntToStr(i)) do s:=s+'0';
s:=s:=IntToStr(i);
//здесь делаешь с S то, что тебе нужно
end;
end;
в делфи примерно так:
var
i, j: Integer;
s: String;
begin
for i:=0 to 9999999 do
begin
s:='';
for j:=1 to 9-Length(IntToStr(i)) do s:=s+'0';
s:=s:=IntToStr(i);
//здесь делаешь с S то, что тебе нужно
end;
end;
Пишу тебе код на паскале:
randomize;
for i:=1 to 99999999 do l:=random(99999999 - i) + i
теперь при каждом прогоне значение l - будет случайным в пределах от i до 9999999
randomize;
for i:=1 to 99999999 do l:=random(99999999 - i) + i
теперь при каждом прогоне значение l - будет случайным в пределах от i до 9999999
есть проги поюзай в гугле по этой теме Генераторы заданных числ
Похожие вопросы
- программисты помогите пожалуйста!
- Программисты помогите пожалуйста!
- Программисты! Помогите пожалуйста! Нужно на паскале написать код к следующей задаче: Даны натуральные числа a, b, c
- ПРОГРАММИСТЫ ПОМОГИТЕ ПОЖАЛУЙСТА!!!
- Программисты! Помогите пожалуйста...
- Меня зовут Влад и мне 16, вижу себя программистом в будущем помогите пожалуйста, дайте совет, поддержите!
- Здравствуйте. Помогите пожалуйста. Хочу стать программистом. 1
- Хорошая ли профессия программист?? ? Напишите пожалуйста свои мнение об этой профессии а также плюсы и минусы
- Товарищи программисты!!!!Ну помогите пожалуйста!!!!
- Программисты помогите!