А. А. Медатов, М. К. Абдувохидов, О. А. Маматқулов

Масала 1. Пифагор жадвалини экранга чиқариш дастурини тузинг.


program pifagor_jadvali;
var i,j:0..9;
begin
for i:=1 to 9 do
begin
for j:=1 to 9 do write(i*j, chr(9));
writeln;
end;
end.


Масала 2. Берилган n сонини мукаммал ёки мукаммал эмаслигини аниқлаш дастури тузилсин.
program mukammal;
var i,j,n,m:integer;
begin
write(‘n=’); readln(n);
for i:=2 to n do
begin
m:=0;
for j:=1 to i-1 do if i mod j=0 then m=m+j;
end;
if m=i then writeln(n, ' mukammal son') else writeln (n, 'mukammal son emas');
end.


Мустахкамлаш учун саволлар

1. Ичма – ич жойлашган цикллар қайси турдаги масалаларга дастур тузишда ишлатилади?

2. Мукаммал сонларни аниқлаш алгоритмини тузинг.


Таянч тушунчалар: бош (ташқи) цикл, ички цикл, ташқи цикл параметри, ички цикл параметри.


Адабиётлар: [1],[2],[3],[5],[6],[7],[8],[9],[10].
Бошқа типлар


Режа:
1. Диапазон типи.
2. Саноқли тип.
3. Мантиқий тип.
4. Сатр типи.

Айрим таркибан, мазмунан бир хил бўлган турдаги элементлар тўплами учун эълон қилинадиган сўз тип маъносини англатади. Бундай тўплам элементлари эълон қилинадиган тип объектлари ёки қийматлари деб юритилади.

1. Бутун, ҳақиқий, белгили, сатр, мантиқий типлар Паскаль тилининг стандарт типлари деб юритилади. Диапазон типи, тўплам, ёзув, саноқли массив (жадвал), файл типлари ностандарт типлар таркибига киради.
Диапазон типини эълон қилишида унинг минимал ва максимал қийматлари иккита нуқта орқали ажратиб ёзилади.
Бичими: