Напечатать числа следующим образом в Pascal21 19.220 18.2...10 8.2

Question

Напечатать числа следующим образом в Pascal
21 19.2
20 18.2
...
10 8.2

Answer 1

uses crt;
var i:integer;
begin
for i:=21 downto 10 do
writeln(i,'   ',i-1.8);
end.

Comments

А если надо выводить такие числа

---

45 44,5 44,2

---

то пишем: writeln (i,' ',i-1.5,' ',i-1.2); ???

---

Это весь ряд? Есть продолжение? Просто пока я не вижу никакой зависимости.

---

Ну вообще да, только переделай строку цикла на for i:=45 downto (нужное число) do

---

НАПИСАЛА ЭТО for i:=45 downto 25 do
writeln(i,' ',i-1.5:2:1,' ',i-1.2:2:1);

---

а он мне выводит 45 43,5 43,8

---

всё получилось )))