Naqadar go'zal va serjilo fasl ... Har bir faslning o'z chiroyi bo'lganidek, bu faslning ham o'zgacha, hech qaysi faslnikiga o'xshamagan husn-tarovati bor. Shoir hamda yozuvchilarimiz aytganidek, bu fasl "Hazon" barglari bilan ajralib turadi ... Kuz fasli kirib kelganda tabiat manzaralariga e'tibor bersangiz ona tabiatimiz oltin libosga burkanadi. Go'zal tabiat manzaralari vujudga keladi. Yerga to'kilayotgan sariq rangdagi barglar o'zgacha olamni yuzaga keltiradi. Istirohat bog'lariga kirib, kuz faslining ajabtovur husni yog'ilayotgan daraxtlar oldida bir zum o'tirsangiz, xuddi sehrli olamga tushib qolgandek bo'lasiz. Mayin shamol, barglarning shitir-shitir tovushlari qalbimizga beg'uborlik, yangilanish hislarini mavj urayotganini ifodalab beradi ... Ammo negadir ko'pchilik kuz faslini yoqtirmaydi. Nima uchun ??? Ko'pchilik kuzni "To'kilish", "Hazon-rezgi" fasli deb atashadi ... Yana kimlardir esa o'lik fasli ham deyishadi ... Bir tomondan olib qaralganda to'g'ri. Kuz fasli kelganida daraxtlar, turli xil hayvonlar qishki uyquga hozirlik ko'rishadi. Daraxtlar barglarini to'kib,Hayvonlar o'z inlarini tayorlab, oziq-ovqat g'amlab uyquga ketishadi. Balki shu uchun ham "To'kilish va O'lik" fasli deyishar ... Lekin har bir
insonning o'ziga yarasha fikri bor. Menimcha kuz
tozalanish fasli ... Nimaga desangiz, Daraxtlar o'zida qolgan eski, keraksiz yaproqlardan tozalanib, keyingi yil uchun kuch to'plab, qishki uyquga ketishadi ... "Kuz" va "Bahor" - fasllari sevishganlar uchun beqiyos his tuyg'ularini vujudga keltiradi. Kuz fasli kelganida sevishganlar oltin kabi burkangan daraxtlar qo'ynida sayr qilganlarida, qalblariga yorqinlik, ijodkorlik fazilatlari namoyon bo'ladi ... Ayniqsa tabiat kuzning serjilo manzaralari bilan yanada ko'rkamlashadi. Yomg'irli kunlarini aytmaysizmi ... Yomg'ir sharros quyib yog'ganda, deraza ortidan ko'chaga bir razm soling, xayollarga berilib qolasiz. Xuddi sehrlanib qolgandek ... Hazon barglar ustida to'planib qolgan yomg'ir yoqutdek tovlanib turadi. Yorqin tilla va qizil ranglar bilan bo'yalib, ajoyib rang barang bezanib turadi ... Asta-sekin kunlar ham qisqarib, tunlar uzaya boshlaydi. Bir oz sovuq, shamolli va yomg'irli kunlar ko'payadi ... Sizga bu fasl nimasi bilan yoqadi ? yoki yoqmaydi ??? Umuman olganda Kuz fasli sizda qanday taasurotlar qoldiradi ???
Объяснение:
open System
[<EntryPoint>]
let main argv =
let mutable sum = 0
let mutable i = 0
let array = [19..51]
while i < array.Length do
let value = array.Item i
if 5 % value = 0 then
sum <- sum + value
i <- i+1
Console.WriteLine sum
Console.ReadKey true |> ignore
0
// Pascal (for)
var sum : integer;
i: integer;
begin
sum := 0;
i := 0;
for i:=19 to 51 do
begin
if i mod 5 = 0 then
sum := sum + i;
end;
writeln(sum);
end.
// Pascal
var sum : integer;
i: integer;
begin
sum := 0;
i := 19;
while (i <= 51) do
begin
if i mod 5 = 0 then
sum := sum + i;
i := i + 1;
end;
writeln(sum);
end.