Воть это задачка, Помогите Опции

[Rossi]

!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...

число 1 оно умнажается в 2 раза получается 2 потом опять 2 в раза получается 4...8 и так 15 раз.
Как в pascal сделать чето торможу.... Помогите пожалуйста наведите на мысль.

Сообщение отредактировано: klem4 - 22.06.2007 0:40

[volvo]

Ты о чем? Тебе что, надо получить все числа 2^x, где X = 0 .. 15?

[Rossi]

Может быть так ?

uses crt;
var a,b,c,i:longint;
begin
clrscr;
for i:=1 to 15 do
write©;
c:=i*b;
b:=c;
end.

[Malice]

Может быть так ?

for i:=1 to 15 do writeln (1 shl i);

[volvo]

А может и так:

c := 1;
for i:=1 to 16 do begin
  write(c, ' ');
  c:=c * 2;
end;

Только с чего ты взял, что тебе будут отвечать, если ты сам этого не делаешь? Я что, вопросы для красоты задаю, по-твоему?

[Rossi]

Мы этого не проходил....
Смотри как должно быть задачка такая чел попросил 1000рубликов ему сказали преходи.... он пришел ему дали типа 1 рубль на следущий день 2 и так 15 раз. Примерно так выгледит задача.

Я думаю что должно быть так возьмем три переменоый типа integer a,b,c.
a:=1; b:=2;
for 0 to 15 do
c:=a*b;
b:=c;
write©;
end.

Может быть так ?


Добавлено через 3 мин.
Volvo опять спасибо!!!
Чтобы я без вас делал )))

Сообщение отредактировано: Rossi - 21.06.2007 20:33