mirror of
https://gitee.com/mirrors_PX4/PX4-Autopilot.git
synced 2026-07-05 12:00:34 +08:00
patacongo
add995c32e
git-svn-id: https://nuttx.svn.sourceforge.net/svnroot/nuttx/trunk@4200 7fd9a85b-ad96-42d3-883c-3090e2eb8679
18 lines
306 B
ObjectPascal
18 lines
306 B
ObjectPascal
{ writeln with a variety of arguments }
|
|
|
|
program check_writeln(output);
|
|
|
|
const
|
|
floater = 1.8;
|
|
low = 37;
|
|
high = 492;
|
|
range_string = ' range=';
|
|
|
|
var
|
|
range : low..high;
|
|
|
|
begin
|
|
range := (low + high) div 2;
|
|
writeln('A', range_string, range, ' B floater=', floater);
|
|
end.
|