Напечатать таблицу значений функций sin х и cos х - Pascal

Формулировка задачи:

Напечатать таблицу значений функций sin х и cos х на отрезке [0,1] с шагом 0.1 в следующем виде (считать, что при печати на каждое вещественное число отводится по 6 позиций строки): х sin(x) cos(x) 0.0000 0.0000 1.0000 0.1000 0.0998 0.9950 ……………………….……. 1.0000 0.8415 0.5403

Решение задачи: «Напечатать таблицу значений функций sin х и cos х»

Листинг программы

uses crt;
var i:byte;
begin
clrscr;
writeln(' x    sin    cos');
for i:=0 to 10 do
writeln(i/10:0:1,' ',sin(i/10):6:4,' ',cos(i/10):6:4);
readln
end.

Объяснение кода листинга программы

Объявляется переменная i типа byte.
Вызывается процедура clrscr, очищающая экран.
Выводится текст x sin cos.
Запускается цикл for от 0 до 10.
В каждой итерации цикла выводится значение переменной i деленное на 10 с точностью до 1 знака после запятой, а также значения функций sin и cos от i деленного на 10 с точностью до 4 знаков после запятой.
Ожидается ввод пользователя.