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

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

Форум «Всё о Паскале» _ Задачи _ циклические конструкции

Автор: mygray 2.10.2006 3:07

mega_chok.gif Пожалуйста помогите! Надо срочно сделать задачки, а я в Паскале не особо.

1) Напечатать числа следующим образом:
21 20.4
22 21.4
23 22.4
так до 35 34.4
Пожалуйста буду оч благодарен!!!

Автор: Bokul 2.10.2006 3:23

Код

var i:byte;
begin
for i:=21 to 35 do
    writeln(i,' ',i-1,'.4');
readln;
end.

Автор: Гость 2.10.2006 3:39

СПАСИБО!!!!

Автор: klem4 2.10.2006 10:32

Bokul, ну как-то не по научному !))

var
  x: Integer;
begin
  for x := 21 to 35 do
   writeln(x, ' ', (x - 0.6):2:1);
end.