Қолданылған әдебиеттер және басқа да ақпарат көздері

Автор работы: Пользователь скрыл имя, 12 Апреля 2013 в 22:25, реферат

Описание работы

Программа - арнайы мәтін арқылы компьютерге тапсырманың алгоритмін хабарлайды. Алгоритм –арнайы іс-әрекеттердің белгілі кезекте орналасқан тәртібі, алогритм арқылы машина тапсырманы орындайды. Программа жасау үнемі өсу,өрлеу, жаңару үстінде. Олай дейтініміз алғашқы программалар машина кодтарына жасалады.Бұл өте қиын жұмыс еді. Себебі программалаушы үнемі кодтық операциялар, ақпараттар, адрестер және командалар арқылы жұмыс істеуге мәжбүр болды. Сондықтан программалаушылар өз жұмыстарын жеңілдету жолдарын іздестіруге кірісуде. Олар алгоритмдік тілдер мен символдық программалау тәсілдерін жасап шығарды.

Содержание работы

1.Алғы сөз.

2. Алгоритм түсінігі.

3. Pascal тілі жөніндегі алғашқы мағлұматтар.

4. Есептер мен жаттығулар жинағы және шығарылуы

5.Қолданылған әдебиеттер және басқа да ақпарат көздері.

Файлы: 1 файл

Паскаль экзамен.doc

— 223.00 Кб (Скачать файл)

writeln(S:8); 

END.  

№23.

program darezhesepteu; 

var a,b,c,d,n,m,r,k,Z,f1,f2,f3,f4:real; 

procedure darezhe(s,t:real; var q:real);

begin      

q:=exp(t*ln(s));

end;

BEGIN      

read(a,n,b,m,c,r,d,k);      

darezhe(a,n,f1);      

darezhe(b,m,f2);      

darezhe(c,r,f3);      

darezhe(d,k,f4);      

Z:=(f1+f2)*f3-f4;      

write(Z:8:2); 

END.        

 

№24. 

program sozder; 

var S:string;    

 k,i:integer; 

BEGIN      

read(S);      

k:=0;      

for i:=1 to length(S) do      

if S[i]=' ' then k:=k+1;      

write(k+1:8,' сөз'); 

END.      

№25.

program esep;

var s:string; i,k:integer;

begin      

read(S); k:=0; i:=1;      

while i<=length(S) do                           

begin                                

if s[i]<>' ' then begin     

                                              k:=k+1;                                                  

i:=i+1;                                                  

end                                              

else begin                              

                 if k=3 then begin                                                          

writeln(copy(S,i-k,k));                                                          

k:=0; i:=i+1;                                                          

      end  

                                                     else begin                                                           

k:=0;                                                           

i:=i+1;                                                          

  end;                                                           

end; end;                                                           

if k=3 then writeln(copy(S,i-k,k));    

end. 

 

 

 

 

 

 

 

Қолданылған әдебиеттер және басқа да ақпарат көздері:

1.Ван Тассел Д. Стиль, «Разработка, эффективность, отладка и испытание программ» - Москва       «Мир», 1981г.

 

2.Информатика. Задачник-практикум в 2 т. / Под ред. И.Г. Семакина, Е.К. Хеннера: Том 2. — Москва. Лаборатория Базовых Знаний, 1999г

 

3.С.А.Абрамова, Е.В.Зима. «Начала программирования на языке Паскаль»-

-Москва «Наука»,1987г

 

4. http://infcd.metodist.ru/

5. Окулов. С.М., Основы программирования. – 3-е изд. – Mосква: БИНОМ. Лаборатория знаний, 2006.

 

 

 

 

 


Информация о работе Қолданылған әдебиеттер және басқа да ақпарат көздері