Практикалық жұмыс №1 Тақырыбы: ет кабинетіндегі техника қауіпсіздігі Теорияға шолу Техника қауіпсіздігі және есептеуіш техника кабинетіндегі тәртіп сақтау ережелері



бет18/43
Дата16.01.2024
өлшемі4.98 Mb.
#489189
түріПрограмма
1   ...   14   15   16   17   18   19   20   21   ...   43
Информатикадан практикалық сабақтар және есептер жинағы

WRITE( ‘A-ның мәні=’ , A);
Шығарылатын параметрлер бір-бірімен үтір арқылы ажыратылады. Паскаль тілінде нақты сандарға шығару операторын қолданғанда оларды компьютер экспоненциалды түрде шығарып көрсетеді. Алдыңғы мысалда экранда келесідей жазу шығады:
A-ның мәні=1.326Е+01
Бұл деген 1.326 *101
Пайдаланушыға түсінікті болу үшін оны қалыпты түрге келтіруге болады.
WRITE( ‘A-ның мәні=’ , A:4:2);
А : 4 : 2 дегендегі 4- нәтижеге берілген барлық орын, 2 – үтірден соңғы бөлшек бөлігіне берілетін орындар саны.
Мысал: функциясын есептейтін программа құру қажет. x – тің мәнін пернетақтадан енгізіледі.
Program esep2;
Var
x:integer;
y:real;
begin
writeln(‘х санын енгізіңіз:‘);
read(x);
y:=sqrt(x);
writeln(‘y=’, y:5:2);
end.

Практикалық жұмыс №13


Тақырыбы: Сызықты алгоритмді программалау


Теорияға шолу
Сызықтық алгоритм программасы тізбектеле орналасқан командалардан тұрады. Сызықтық программа құру үшін енгізу-шығару және меншіктеу операторларын білу жеткілікті. Мысалдар:
Есеп 1 (1-деңгей-төменгі).2 бүтін сан енгізіп және 1-ші санның 2-санға бөліндісін есептеп, оны экранға шығаратын программа құру.
Program esep1_1;{программаның аты}
Var{айнымалыларды сипаттау бөлімі}
n1,n2 : Integer;{n1 және n2 – бүтін сандарын анықтау}
х : Real;{бөлінді нәтижесі x – нақты сан}
BEGIN{программа басы}
Write( 'n1 = ');{ n1 санын енгізу туралы ақпаратты экранға шығару}
ReadLn (n1) ;{ n1 – ді енгіземіз}
Write ( 'n2 = ');{ п2 санын енгізу туралы ақпаратты экранға шығару}
ReadLn (n2);{ п2 – ні енгіземіз}


Достарыңызбен бөлісу:
1   ...   14   15   16   17   18   19   20   21   ...   43




©dereksiz.org 2024
әкімшілігінің қараңыз

    Басты бет