Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Вывод чисел в указанном диапазоне

Автор: jenka 27.10.2006 5:20

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

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

Автор: lapp 27.10.2006 6:14

Цитата(jenka @ 27.10.2006 2:20) *

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

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

Цитата(jenka @ 27.10.2006 2:20) *
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 28.10.2006 4:24

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

Автор: volvo 28.10.2006 4:41

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

Автор: klem4 29.10.2006 13:25

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


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