Var x,y: integer;
begin write('Введите два целых числа, разделяя их пробелом: ');
readln(x,y);
if x>y then
writeln('Сумма ',x,' и ',y,' равна ',x+y)
else
writeln('Произведение ',x,' и ',y,' равно ',x*y);
writeln('Задача решена');
<span>end.</span>
// F#
[<EntryPoint>]
let main argv =
let getArray =
let rand = new System.Random();
[1..4] |> Seq.map (fun x -> rand.Next 10)
let A = getArray;
let B = getArray;
let C = A |> Seq.mapi (fun i a -> a * a - (B |> Seq.nth i))
printf "%s" (Seq.fold (fun sum x -> sprintf "%s %d" sum x) "" C)
System.Console.ReadKey true |> ignore
0
1)
_256 _100100 _ ABC
<u> 77 </u> <u> 1011 </u> <u> FF</u>
157 11001 3D
2) A B C D E F 10 11 12 13 14
(10) (11) (12) (13) (14) (15) (16) (17) (18) (19) (20)
3)
1011 254
<u> 111</u> <u> 613</u>
10010 1067<u>
</u>
Графика с представлением изображения в виде совокупностей точек называется:
Ответ. 2) растровой.