// F#
[<EntryPoint>]
let main argv =
let sum =
[0..200]
|> Seq.where (fun x -> x % 4 = 0)
|> Seq.fold (fun sum x -> sum + x) 0
System.Console.WriteLine sum
System.Console.ReadKey true |> ignore
0
<span>
</span>
Строение организма
машина
принтер, плита и т.п
uses Robot;
begin
Task('cif2');
while FreeFromRight do begin
Right;
if WallFromUp or WallFromDown then Paint;
end;
end.
7(16)=7(8) и 251(8)
1)247(8)
2)Переводим в 8СС=212 (010001010)
3)248 ЭТО ЧИСЛО НЕ МОЖЕТ БЫТЬ в 8СС
4)А8(16)=10101000=251(8)
Если условие записано правильно, то 1) и 2)
Вот код программы!
free pascal