1)
var a:integer;
begin
for a:=1 to 5 do
write(a,' ');
end.
2)
var a:integer;
begin
for a:=5 downto 1 do
write(a,' ');
end.
Var n:integer;
begin
write('n = ');
readln(n);
if n mod 2 = 0
then n:=3*n else n:=2*n;
writeln('n = ',n);
end.
Пример:
n = 7
n = 14
1) 65
2) AB
3) 1000111.111
4) 740.6
5) F8.4
C# 8.0
using System.Linq;
...
int Max = new int[]{a,b,c}.Max();