// 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
var
i, count: integer
i := 1;
count := 0;
repeat
String stroka;
readln(stroka);
if(length(stroka)<3)
count := count+1;
i:=i+1
Until(i=8);
Выводишь на экран
Цикл оформляй через for, я просто забыл синтаксис этого цикла.
1)переводчик лишнее
2)антивирусная программа лишнее
1АКЛМ по возрастанию 2МЛКА наоборот по уменьшанию 3МАЛК это большое маленькое большое маленькое 4АМКЛ наоборот маоенько большое маленькое большое Ас буквой М получается 2 хоть я и в 5 классе и у меня нет информатики надеюсь правельно ответил