Составьте программу которая в строку выводит числа от 10 до 100
var
i: Integer;
begin
for i := 10 to 100 do
Write (i, ', ');
ReadLn;
end.
Program n_1;
var i:integer;
for i:=10 to 100 do write(i, ' ');