Составить программу , которая подсчитает кол-во элементов , меньших 5 , в заданном массиве.

#include < iostream> int main(){       int a[10];       int b = 0;       for (int i = 0; i < 10; ++i){           std: : cin > > a[i];           if (a[i] < 5) b++;       }       std: : cout < < b;       return 0; }

Ел мен жер, өмір мен болашақ туралы ойланбайтын адам бар ма? Мынау жұмыр жерді мекен етіп жүрген әрбір жан бақытты ғұмыр, нұрлы болашақты аң­сай­ды. Ол арманның іске асуы үшін де елі экономикалық табысты бағытта жылжып, бейбіт мақсатпен өмір сүретіндігі ауадай қажет. Қандай ел болмасын, дербес даму жолы, алдына қойған мақсат-міндеті болады. Міне, осы ата-бабаларымыз сан ғасырлар аңсаған арманы орындалды. Бү­гінде құлашын кеңге жайған бай­тақ елге айналып, болашақты бағдарлап байыптайтын,  өтпелі кезеңде халықпен бір болып, елдің еңсесін көтеруге аянбай ат салысып, тер төккен Елбасы­мыз Н.Назарбаевтың ерен ең­бегін Қа­зақстан тұрғындары жо­ғары бағалайды.

Елбасымыз қалыптасқан жағдайға қай жа­ғынан да сын көзімен үңіліп, байыпты талдап, қажетті деген іс-шараларды қабылдап, әр бас­тама халықтың игілігіне қызмет жасауын үнемі бақылауда ұстап келеді. Қазіргі заман талабы мен мүмкіндіктеріне сай, денсаулық, білім, көлік және байланыс, ұлттық қауіпсіздік, ауыл проблемалары, экономика, сонымен қатар, алға жылжуымыздың басты шарты – қоғамымыздың биік мақсаттарға қол жеткізуі үшін халықтың бір­тұтастығы, ауадай қажет. Біз қазіргі таңда ұлы өзгерістер мен жаһандану кезеңінде өмір сү­рудеміз. Елбасымыздың «2030 жылға қарай Қазақстан Орта Азия барысына айналады және өзге дамушы елдер үшін үлгі болады деп сенемін»,– деген пікірі ту­ған халқының жігерін оятты. Әлбетте, игілікті істің бастауында Елбасымыз жүрді. Егемендік алған жылдар республикадағы ұлттар мен ұлыстардың діні мен тілін жаңғыртты, ұлт мүд­десіне қызмет жасайтын ау­қым­ды істерді өмірге әкелді. Ел­ба­сының байсалдылығы мен ұш­қыр саясатының, көрегендігі мен зерделілігінің арқасында Қа­зақ­стан әлемдік қаржы дағ­да­рысының қыспағының ауыртпа­лығына мойымай, қажырлылық танытты. «Мен өз тағдырымды халқымның тағдырынан бө­лек қарап көрген емеспін»,– де­ген Н.Назарбаевтың жүрек толға­ны­сы сенімімізді нығайтты. 

Еліміздің болашағы – жастар. Сол келешек ұрпақтың дені сау, жаны таза, білімі терең, мә­де­ниеті жоғары азамат болуы қоғам алдындағы басты міндет екенін Елбасымыз жақында өткен Жас­тар съезінде айқындап берді. 

Мен осындай ұлы көштің бастаушысы, елінің ертеңі мен халқының келешегін жеке ба­сы­ның тағдырынан жоғары қоя­тын үлкен жүректі азамат Н.Назарбаевтың ел мүддесін, мемлекет абыройын, халық қа­мын ойлап, қоғам игілігі үшін білек сыбана кірісетін еңбек­қор­лығына, адамгершілігіне риза­шылығымды білдіремін. Еліміздің бүгінгі амандығы, әлеуметтік жағ­дайының дұрыстығы, еш алаңсыз бейбіт аспан астында ғұмыр кешуі – Елбасының сұң­ғыла нәтижесі. Олай болса, Тәуелсіздік жылдарында, Елба­сы­мен қатар жүріп келе жатқан, жарқын болашаққа апаратын сара жолымыз мәңгілік жалғаса  берсін. 

Основную ошибку вам уже указали. можно программу немного сократить: program yyy;   function prost(x: integer): boolean;   var  k,i: integer;   begin  k: =0;   for i: =2 to trunc(sqrt(x)) do   if x mod i = 0 then k: =k+1;   prost: =k=0 end;   var  n,m,i: integer;   begin  write('n='); readln(n);   write('m='); readln(m);   for i: =n to m-2 do   if prost(i) and prost(i+2)   then writeln(i,'   ', (i+2));   end. пример: n=1 m=150 1   3 3   5 5   7 11   13 17   19 29   31 41   43 59   61 71   73 101   103 107   109 137   139