Паскаль. написать программу, вычисляющую значение y = корень x при x от 1 до 50 с шагом 2.

// pascalabc.net 3.1, сборка 1230 от 27.04.2016 begin   range(1,50,2).tabulate(x-> sqrt((newline) end. результат (1,1) (3,1.73205080756888) (5,2.23606797749979) (7,2.64575131106459) (9,3) (11,3.3166247903554) (13,3.60555127546399) (15,3.87298334620742) (17,4.12310562561766) (19,4.35889894354067) (21,4.58257569495584) (23,4.79583152331272) (25,5) (27,5.19615242270663) (29,5.3851648071345) (31,5.56776436283002) (33,5.74456264653803) (35,5.91607978309962) (37,6.08276253029822) (39,6.2449979983984) (41,6.40312423743285) (43,6.557438524302) (45,6.70820393249937) (47,6.85565460040104) (49,7)

1;2;3;6;8;9. Так как в восьмиричную систему входят цифры от 1 до 7 включительно

1. Алгоритм
Машинный код
Интерфейс
2.
Windows, Mac OS. , Linux
3.
Создать, сохранить, закрыть, открыть, переименовать, переместить, копировать, удалить.

Program z1;
var a:array[1..12] of integer;
i:integer;
begin
for i:=1 to 12 do a[i]:=random(18)-6;    тут присваивается каждому аргументу значение от 1 до 18 - 6  т.е от -5 до 12 
for i:=1 to 12 do writeln(a[i]*a[12]);    тут выводим умножив на последний аргумент
end.