Вывод чисел в указанном диапазоне, напечатать столбиком Опции

[jenka]

Помогите, пожалуста, мне с решением вот таких задач:
1. Напечатать "столбиком" все целые числа от а до b (значения а, b
вводятся с клавиатуры; b>а).
2. Вывести "столбиком" значения sin 0,1, sin 0,2,..., sin 1,1.
Очень буду благодарна Вам за помощь.

jenka, не пиши свои задачи в чужих темах. Делай свои.

Сообщение отредактировано: lapp - 27.10.2006 2:06

[Lapp]

Помогите, пожалуста, мне с решением вот таких задач:
1. Напечатать "столбиком" все целые числа от а до b (значения а, b вводятся с клавиатуры; b>а).

  ReadLn(a,b);
  for i:=a to b do WriteLn(i);

2. Вывести "столбиком" значения sin 0,1, sin 0,2,..., sin 1,1.

  x:=0.1;
  while x<=1.11 do begin
    WriteLn(Sin(x));
    x:=x+0.1
  end;

[jenka]

Огромное спасибо!
while x<=1.11 do begin А в этой строке х точно меньше или равен 1.11, или все таки нада написать 1.1, Это описка или нет?

Сообщение отредактировано: jenka - 28.10.2006 0:25

[volvo]

Это описка или нет?

Нет... Желательно при сравнении вещественных чисел не надеяться на "=", а давать чуть-чуть большее значение, и быть уверенным в том, что отработает "<"... Я бы вообще убрал из сравнения знак "равно", а то отвлекает

[klem4]

1. Напечатать "столбиком" все целые числа от а до b (значения а, b
вводятся с клавиатуры; b>а).

А сами а и b - целые ?