Упуфбчмеойе й тебмйъбгйс тбъчефчмсаэйиус бмзптйфнпч
чПРТПУ 1
вБЪПЧЩЕ МПЗЙЮЕУЛЙЕ УФТХЛФХТЩ
вБЪПЧЩНЙ МПЗЙЮЕУЛЙНЙ УФТХЛФХТБНЙ Ч РТПЗТБННЙТПЧБОЙЙ СЧМСАФУС УМЕДХАЭЙЕ ФТЙ:љ РПУМЕДПЧБФЕМШОПУФШ, ЧЕФЧМЕОЙЕ Й РПЧФПТЕОЙЕ.
ЧПРТПУ 2
пРЕТБФПТЩ СЪЩЛБ РТПЗТБННЙТПЧБОЙС Delphi (рБУЛБМШ)
1 рПОСФЙА ПРЕТБФПТБ СЪЩЛБ РТПЗТБННЙТПЧБОЙС УППФЧЕФУФЧХЕФ РПОСФЙЕ РТЕДМПЦЕОЙС Ч ЕУФЕУФЧЕООЩИ СЪЩЛБИ. лБЦДЩК ПРЕТБФПТ ЧЩРПМОСЕФ ПРТЕДЕМЕООХА БМЗПТЙФНЙЮЕУЛХА ПРЕТБГЙА. оБРТЙНЕТ, y:=x+5; - ЬФП ПРЕТБФПТ РТЙУЧБЙЧБОЙС.
2 рТПУФЩЕ ПРЕТБФПТЩ Ч ПФМЙЮЙЕљ ПФ УМПЦОЩИ ОЕ УПДЕТЦБФ ЧОХФТЙ УЕВС ДТХЗЙИ ПРЕТБФПТПЧ. л РТПУФЩН ПРЕТБФПТБН ПФОПУСФУС ПРЕТБФПТЩ РТЙУЧБЙЧБОЙС, ЧЩЪПЧБ РПДРТПЗТБННЩ, РЕТЕИПДБ Й РХУФПК ПРЕТБФПТ.
3 ч ВПМШЫЙОУФЧЕ ЛПОУФТХЛГЙК ТБУУНБФТЙЧБЕНПЗП СЪЩЛБ РТПЗТБННЙТПЧБОЙС ТБЪТЕЫБЕФУС Ч УППФЧЕФУФЧХАЭЕН НЕУФЕ ЙУРПМШЪПЧБФШ ФПМШЛП ПДЙО ПРЕТБФПТ. ч ФПЦЕ ЧТЕНС ЮБУФП Ч ЬФЙИ ЛПОУФТХЛГЙСИ ОЕПВИПДЙНП ЙУРПМШЪПЧБФШ УЕТЙА ПРЕТБФПТПЧ, Ф.Е. УПЧПЛХРОПУФШ РПУМЕДПЧБФЕМШОП ЧЩРПМОСЕНЩИ ПРЕТБФПТПЧ. ч ЬФЙИ УМХЮБСИ УЕТЙС ПРЕТБФПТПЧ ЪБЛМАЮБЕФУС Ч ПРЕТБФПТОЩЕ УЛПВЛЙbegin Й end, Й ТБУУНБФТЙЧБЕФУС ЛБЛ ПДЙО УПУФБЧОПК ПРЕТБФПТ.љ рЕТЕД УЛПВЛПК end ТБЪТЕЫБЕФУС УФБЧЙФШ ФПЮЛХ У ЪБРСФПК, ОП Ч ЬФПН ОЕФ ОЕПВИПДЙНПУФЙ.
4 ъБРЙУШ УПУФБЧОПЗП ПРЕТБФПТБ:
begin
| |||||
end;
5 л УМПЦОЩН ПРЕТБФПТБН ПФОПУСФУС УМЕДХАЭЙЕ ПРЕТБФПТЩ: ХУМПЧОЩЕ (еумй Й чщвпт), ГЙЛМБ, РТЙУПЕДЙОЕОЙС (WITH), ЙУРПМШЪХЕНЩК РТЙ ТБВПФЕ У ЪБРЙУСНЙ.
6 рПД ппу (ПРЕТБФПТПН ПДЙОПЮОЩН ЙМЙ УПУФБЧОЩН) ВХДЕН РПОЙНБФШ ПРЕТБФПТ, ОБ НЕУФЕ ЛПФПТПЗП ТБЪТЕЫБЕФУС МЙВП ПДЙОПЮОЩК, МЙВП УПУФБЧОПК ПРЕТБФПТ. пДЙОПЮОЩК ПРЕТБФПТ НПЦЕФ ВЩФШ ЛБЛ РТПУФЩН, ФБЛ Й УМПЦОЩН.љ
љљљ
чПРТПУ 3
лПОУФТХЛГЙСљ еумй
йЪЧЕУФОЩ ФТЙ МПЗЙЮЕУЛЙЕ ТБЪОПЧЙДОПУФЙ ДБООПК ЛПОУФТХЛГЙЙ: РПМОБС, еумй фп Й еумй йобюе.
чПРТПУ 4
1 рПМОБС ЖПТНБ ЛПОУФТХЛГЙЙ еумй (еумй фп -йобюе)
лПОУФТХЛГЙС ТБВПФБЕФ УМЕДХАЭЙН ПВТБЪПН (УН. ТЙУ.): ЕУМЙ ЪБДБООПЕ ХУМПЧЙЕљ ЙУФЙООП, ФП ЧЩРПМОСЕФУС ФПМШЛП ппу1,ЙОБЮЕ, Ф.Е. ЕУМЙ ХУМПЧЙЕљљ МПЦОП, ФП ЧЩРПМОСЕФУС ФПМШЛП ппу2
1.1 ъБРЙУШ Ч ЧЙДЕ УИЕНЩ:
љљљ
|
|
1.2 љъБРЙУШ ОБ СЪЩЛЕ рБУЛБМШ:
љљљљљљљљљ if ХУМПЧЙЕљ then OOC1
љљљљљљљљљљљљљљљљљљљљљљљљљљљљ else OOC2;
1.3 рТЙНЕТ 1:љ оБКФЙ Х=IxI.
1.3.1 уИЕНБ БМЗПТЙФНБ ТЕЫЕОЙС РТЙНЕТБ 1:
1.3.2 ъБРЙУШ ТЕЫЕОЙС РТЙНЕТБ 1 ОБ СЪЩЛЕ РТПЗТБННЙТПЧБОЙС:
if x>0 then y:=x
elseљ y:=-x;
ЧПРТПУ 5.
2 лПОУФТХЛГЙС еумй - фп
пОБ ТБВПФБЕФ УМЕДХАЭЙН ПВТБЪПН (УН. УМЕДХАЭЙК ТЙУ.): ЕУМЙ ЪБДБООПЕ ХУМПЧЙЕ ЙУФЙООП, ФП ЧЩРПМОСЕФУС ппу ,ЙОБЮЕ, Ф.Е. ЕУМЙ ХУМПЧЙЕ МПЦОП, ФП ПУХЭЕУФЧМСЕФУС ЧЩИПД ЙЪ ЛПОУФТХЛГЙЙ ВЕЪ ЧЩРПМОЕОЙС ЛБЛЙИ-МЙВП ДЕКУФЧЙК.
2.1 ъБРЙУШ Ч ЧЙДЕ ВМПЛ-УИЕНЩ:
2.2 ъБРЙУШ ОБ СЪЩЛЕ РТПЗТБННЙТПЧБОЙС УФТХЛФХТЙТПЧБООПК ЖПТНЩ ЛПОУФТХЛГЙЙ еумй - фп:
љљљљљљљљљ if ХУМПЧЙЕљ then OOC
љљљљљљљљљ else;
2.3 ъБРЙУШ ОБ СЪЩЛЕ РТПЗТБННЙТПЧБОЙС ОЕУФТХЛФХТЙТПЧБООПК ЖПТНЩ ЛПОУФТХЛГЙЙ еумй - фп:
љљљљљљљљљ if ХУМПЧЙЕљ then OOC;
2.4 рТЙНЕТ 2: ЧЩРПМОЙФШ x:=IxI У ЙУРПМШЪПЧБОЙЕН ЛПОУФТХЛГЙЙ еумй - фп.љљ
2.4.1 вМПЛ-УИЕНБ ТЕЫЕОЙС РТЙНЕТБ 2 У ЙУРПМШЪПЧБОЙЕН ЛПОУФТХЛГЙЙ еумй - фп:
2.4.2 ъБРЙУШ ТЕЫЕОЙС РТЙНЕТБ 2 ОБ СЪЩЛЕ РТПЗТБННЙТПЧБОЙС У ЙУРПМШЪПЧБОЙЕН УФТХЛФХТЙТХЕНПК ЖПТНЩ ЛПОУФТХЛГЙЙ еумй - фп:
if x<0 then x:=-x
else;
2.4.3 ъБРЙУШ ТЕЫЕОЙС РТЙНЕТБ 2 ОБ СЪЩЛЕ РТПЗТБННЙТПЧБОЙС У ЙУРПМШЪПЧБОЙЕН ОЕУФТХЛФХТЙТПЧБООПК ЖПТНЩ ЛПОУФТХЛГЙЙ еумй -фп:
if x<0 then x:=-x;
чПРТПУ 6
3 лПОУФТХЛГЙС еумй - йобюе
пОБ ТБВПФБЕФ УМЕДХАЭЙН ПВТБЪПН (УН. УМЕДХАЭЙК ТЙУ.): ЕУМЙ ЪБДБООПЕ ХУМПЧЙЕљ ЙУФЙООП, ФП ПУХЭЕУФЧМСЕФУС ЧЩИПД ЙЪ ЛПОУФТХЛГЙЙ ВЕЪ ЧЩРПМОЕОЙС ЛБЛЙИ-МЙВП ДЕКУФЧЙК,ЙОБЮЕ, Ф.Е. ЕУМЙ ХУМПЧЙЕљљ МПЦОП, ФП ЧЩРПМОСЕФУС ппу.
3.1 ъБРЙУШ Ч ЧЙДЕ УИЕНЩ:
3.2 ъБРЙУШ ОБ СЪЩЛЕ РТПЗТБННЙТПЧБОЙС ЛПОУФТХЛГЙЙ еумй - йобюе:
љљљљљљљљљ if ХУМПЧЙЕљ then
љљљљљљљљљ else OOC;
3.3 рТЙНЕТ 3: ЧЩРПМОЙФШ x:=IxIљ У ЙУРПМШЪПЧБОЙЕН ЛПОУФТХЛГЙЙ еумй - йобюе.љ
3.3.1 уИЕНБ БМЗПТЙФНБ ТЕЫЕОЙС РТЙНЕТБ 3 У ЙУРПМШЪПЧБОЙЕН ЛПОУФТХЛГЙЙ еумй - йобюе:
3.3.2 ъБРЙУШ ТЕЫЕОЙС РТЙНЕТБ 3 ОБ СЪЩЛЕ рБУЛБМШ У ЙУРПМШЪПЧБОЙЕН ЛПОУФТХЛГЙЙ еумй - йобюе:
if x<0 then
else x:=-x;
ъБНЕЮБОЙЕ!!!љ ч ЧЕФЧШ then, ФБЛЦЕ ЛБЛ Й else, ОЕМШЪС РПНЕУФЙФШ ОЕУЛПМШЛП ПРЕТБФПТПЧ. ч ЛБЦДПК ЧЕФЧЙ НПЦЕФ ОБИПДЙФШУС МЙВП ПДЙОПЮОЩК ПРЕТБФПТ, МЙВП УПУФБЧОПК. оЕ ГЕМЕУППВТБЪОП ВТБФШ Ч ПРЕТБФПТОЩЕ УЛПВЛЙ ПДЙОПЮОЩЕ ПРЕТБФПТЩ (РТПУФПК, ХУМПЧОЩК, ГЙЛМБ, ЧЩЪПЧБ РПДРТПЗТБННЩ Й ЧЩЪПЧБ РПДРТПЗТБННЩ), ИПФС ЬФП Й ОЕ СЧМСЕФУС ПЫЙВЛПК. уПУФБЧОПК ПРЕТБФПТ ПВСЪБФЕМШОП ЧЛМАЮБЕФ Ч УЕВС ПРЕТБФПТОЩЕ УЛПВЛЙ.
чПРТПУ 7
рТЙНЕТ ЛПОУФТХЛГЙЙ еумй У ЙУРПМШЪПЧБОЙЕН УПУФБЧОПЗП ПРЕТБФПТБ
фТЕВХЕФУС УПУФБЧЙФШ БМЗПТЙФН Й РТПЗТБННХ ОБИПЦДЕОЙС ЛПТОЕК ЛЧБДТБФОПЗП ХТБЧОЕОЙС ax2+bx+c=0 У РТПЙЪЧПМШОЩНЙ ЛПЬЖЖЙГЙЕОФБНЙ a, b, c (a¹0), ДМС ЖЙЛУБГЙЙ ТЕЪХМШФБФПЧ ТБУЮЕФПЧ УДЕМБФШ ЛПРЙА РПМШЪПЧБФЕМШУЛПЗП ЬЛТБОБ.
1 уИЕНБ БМЗПТЙФНБ ТЕЫЕОЙС ЪБДБЮЙ:
|
|
|
|
|
љљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљљ
2 фЕЛУФ РТПЗТБННЩ ОБ СЪЩЛЕ рБУЛБМШ:
program nk;
var
љљ љљљa,b,c,d,x1,x2:real;
begin
write('чЧЕДЙФЕ ЪОБЮЕОЙС РЕТЕНЕООЩИ a,b,c: ');љљљљљљљ readln(a,b,c);
љљ writeln('йУИПДОЩЕ ДБООЩЕ: a=',a:4:2,' b=', b:4:2,'c=':5,c:4:2);
љљ write('тЕЪХМШФБФ: ');
љљ d:=sqr(b)-4*a*c;
љљ if d<0
љљљљ then writeln('ДЕКУФЧЙФЕМШОЩИ ЛПТОЕК ОЕФ')
љљљљ else begin
љљљљљ љљљљљљљљљљљx1:=(-b+sqrt(d))/(2*a);
љљљљљљ љљљљљљљљљљx2:=(-b-sqrt(d))/(2*a);
љљљљљљ љљљљљљљљљwriteln('x1=',x1:4:2,'x2=':5,x2:4:2)
љљљљљљ љљљљљend;
љљ readln;
end.
3 дМС ФПЗП ЮФПВЩ УДЕМБФШ ЛПРЙА РПМШЪПЧБФЕМШУЛПЗП ЬЛТБОБ У ТЕЪХМШФБФБНЙ ЧЩРПМОЕОЙС РТПЗТБННЩ ОХЦОП ПДОПЧТЕНЕООП ОБЦБФШ ЛМБЧЙЫЙ Shift Й PrtSc .
чПРТПУ 7
фЕЛУФ РТПЗТБННЩ ОБ СЪЩЛЕ Delphi (ЛПОУПМШОЩК ТЕЦЙН)
program Project2;
{$APPTYPE CONSOLE}
uses
љљљљљ љљSysUtils;
љ var
љљљљљљљ a,b,c,d,x1,x2:real;
begin
write('Read a,b,c: ');љљљљљљљ readln(a,b,c);
љљ writeln('Input data: a=',a:4:2,' b=', b:4:2,'c=':5,c:4:2);
љљ write('Risult: ');
љљ d:=sqr(b)-4*a*c;
љљ if d<0
љљљљљљ then writeln('Real root is not')
љљљљљљ else begin
љљљљљљљљљљљљљљљљљљљљљљљ x1:=(-b+sqrt(d))/(2*a);
љљљљљљљљљљљљљљљљљљљљљљљ x2:=(-b-sqrt(d))/(2*a);
љљљљљљљљљљљљљљљљљљљљљљ writeln('x1=',x1:4:2,'x2=':5,x2:4:2)
љљљ љљљљљљљљљљљend;
љљ readln;
end.
чПРТПУ 8
чБТЙБОФЩ ЪБРЙУЙ ХУМПЧЙК (МПЗЙЮЕУЛЙИ ЧЩТБЦЕОЙК)
ч ЛПОУФТХЛГЙЙ еумй ЪБРЙУЩЧБЕФУС ЧЩТБЦЕОЙЕ, ЛПФПТПЕ НПЦЕФ РТЙОЙНБФШ ЪОБЮЕОЙЕ ЙМЙ ЙУФЙОБ ЙМЙ МПЦШ. ьФЙ ЧЩТБЦЕОЙС НПЗХФ ВЩФШ ЙМЙ РТПУФЩНЙ ЙМЙ УПУФБЧОЩНЙ. рТПУФПЕ ЧЩТБЦЕОЙЕ Ч ПВЭЕН УМХЮБЕ ЙНЕЕФ ЧЙД:љ
БМЗЕВТБЙЮ. ЧЩТБЦЕО.1 ЪОБЛ ПРЕТБГ. УТБЧОЕОЙС БМЗЕВТБЙЮ. ЧЩТБЦЕО.2
рТЙНЕТЩ РТПУФЩИ ХУМПЧЙК: 1) y>=x+1; 2) D<0. йУРПМШЪХАФУС УМЕДХАЭЙЕ ЪОБЛЙ ПРЕТБГЙЙ УТБЧОЕОЙС: 1) =; 2) <>; 3) <; 4) >; 5)>=; 6)<=.
уПУФБЧОЩЕ ХУМПЧЙС ПВТБЪХАФУС ЙЪ РТПУФЩИ УПЕДЙОЕОЙЕН ЙИ УМХЦЕВОЩНЙ УМПЧБНЙ СЪЩЛБ рБУЛБМШ ПВПЪОБЮБАЭЙИ УППФЧЕФУФЧЕООП ЙНЕОБ МПЗЙЮЕУЛЙИ ПРЕТБГЙК й, ймй, ое: AND, OR, NOT.
рХУФШ б, B ОЕЛПФПТЩЕ МПЗЙЮЕУЛЙЕ ЧЩТБЦЕОЙС. фПЗДБ НПЦОП ЪБРЙУБФШ:
|
2) (A) OR (B) (ЮЙФБЕФУС: б ЙМЙ ч)- ЬФП ХУМПЧЙЕ ЙУФЙООП Ч ФПН УМХЮБЕ, ЕУМЙ ЙУФЙООП ИПФСљ ВЩљ ПДОП ХУМПЧЙЕ ЙМЙ ХУМПЧЙЕ б ЙМЙ ХУМПЧЙЕ ч. фБЛЙН ПВТБЪПН ХЛБЪБООПЕ ХУМПЧЙЕ МПЦОП Ч УМХЮБЕ, ЕУМЙ МПЦОП Й ХУМПЧЙЕ Й б Йљ ч. хУМПЧЙЕ (y>5)OR(x>3) ЙУФЙООП Ч УМХЮБЕ, ЕУМЙ ЙУФЙООП ХУМПЧЙЕ (y>5) ЙМЙ ЙУФЙООП ХУМПЧЙЕ (x>3) ЙМЙ ПВБ ХУМПЧЙС.
3) NOT(A) (ЮЙФБЕФУС: ОЕ б) -ЬФП ХУМПЧЙЕ ЙУФЙООП Ч ФПН УМХЮБЕ, ЕУМЙ ХУМПЧЙЕ б МПЦОП. ьФП ХУМПЧЙЕ МПЦОП, ЕУМЙ ХУМПЧЙЕ б ЙУФЙООП.
хУМПЧЙЕ NOT(x>3) ЙУФЙООП Ч ФПН УМХЮБЕ, ЕУМЙ ХУМПЧЙЕ x>3 МПЦОП, Ф.Е. ЕУМЙ x£3.
чПРТПУ 9
рТЙНЕТ ТЕЫЕОЙС ЪБДБЮЙ У ЙУРПМШЪПЧБОЙЕН ЛПОУФТХЛГЙЙ еумй, ЧМПЦЕООПК Ч ДТХЗХА ЛПОУФТХЛГЙА еумй, ПФМБДПЮОПК РЕЮБФЙљ Йљ УФБОДБТФОПЗП НПДХМС Printer
рХУФШ ФТЕВХЕФУС УПУФБЧЙФШ РТПЗТБННХ, РПЪЧПМСАЭХА РП ЪБДБООПНХ ЪОБЮЕОЙА БТЗХНЕОФБ И ОБКФЙ ЪОБЮЕОЙЕ Х ЖХОЛГЙЙ
уПУФБЧЙН РТПЗТБННХ ОБ СЪЩЛЕ рБУЛБМШ.
{...}
program funct;
Uses Printer;
var
љљ x,y:real;
begin
љљ write('чЧЕДЙФЕ ЪОБЮЕОЙС РЕТЕНЕООПК x: '); readln(x);
љљ writeln(lst,'йУИПДОЩЕ ДБООЩЕ: x=', x:4:2);
љљ write('пФМБДПЮОБС РЕЮБФШ: ');
љљ if x<0
љљљљ then begin
љљљљ writeln('A');
љљљљљљљљљ љљљљљy:=-x
љend
љљљљљ else if (x>=0) and (x<5)
љљљљљљљљљљљљљљљ then begin
љљљљљљљљљљљљљљљљљљљљљљљљљљљ writeln('B');
љљљљљљљљљљљљљљљљљљљљљљљљљљљ y:=sqr(x)
љљљљљљљљљљљљљљљљљљљљљљљ end
љљљ {НПЦОП ВЩМП ЧНЕУФП ХУМПЧЙС (x>=0)and(x<5) ЪБРЙУБФШ x<5)}
љљљљљљљљљљљљљљљљ else begin
љљљљљљљљљљљљљљљљ љљљљљљљљљљљwriteln('C');
љљљљљљљљљљљљљљљљљљљљљљљљљљљ y:=x
љљљљљљљљљљљљљљљљљљљљљљљљ end;
љљ writeln(lst,'тЕЪХМШФБФ: ',y:4:2);
љљ readln;
end.
рТЙ ПФМБДЛЕ ДБООПК РТПЗТБННЩ ТЕЛПНЕОДХЕФУС ЙУРПМШЪПЧБФШ РСФШ ФЕУФПЧЩИ ЪОБЮЕОЙК: ФТЙ ОБИПДСЭЙЕУС ЧОХФТЙ ХЛБЪБООЩИ ДЙБРБЪПОПЧ Й ДЧБ ЗТБОЙЮОЩИ ЪОБЮЕОЙС. оБРТЙНЕТ, УМЕДХАЭЙЕ ЪОБЮЕОЙС ЙУИПДОПК РЕТЕНЕООПК И: -4, 0, 3, 5, 6.
чПРТПУ 10
йУРПМШЪПЧБОЙЕ ПФМБДЮЙЛБ РТЙ ПФМБДЛЕ ХЛБЪБООПК РТПЗТБННЩ
юФПВЩ ЙЪВЕЦБФШ ОЕПВИПДЙНПУФЙ ЧЛМАЮЕОЙС Ч ФЕЛУФ РТПЗТБННЩ ДПРПМОЙФЕМШОПК ПФМБДПЮОПК РЕЮБФЙ НПЦОП ЙУРПМШЪПЧБФШ ЧУФТПЕООЩК ПФМБДЮЙЛ УЙУФЕНЩ РТПЗТБННЙТПЧБОЙС. дМС ЬФПЗП ЧЩРПМОЙН УМЕДХАЭЙЕ ДЕКУФЧЙС:
Б) тБЪНЕУФЙН Ч ПЛОЕ РТПУНПФТБ (Watch) ЙНЕОБ РЕТЕНЕООЩИ, ЙЪНЕОЕОЙЕ ЪОБЮЕОЙК ЛПФПТЩИ Ч РТПГЕУУЕ РПЫБЗПЧПЗП ЧЩРПМОЕОЙС РТПЗТБННЩ НЩ ВХДЕН РТПУНБФТЙЧБФШ. дМС ЬФПЗП ТБУРПМПЦЙН Ч ПЛОЕ ТЕДБЛФПТБ РПД РЕТЕНЕООПК И ЛХТУПТ Й ТЕБМЙЪХЕН ЛПНБОДХ Debug/Add Watchљљљљљљљљљљљљљљ (Control+F7).
В) вХДЕН ЧЩРПМОСФШ РПЫБЗПЧПЕ ЧЩРПМОЕОЙЕ РТПЗТБННЩ ОБЦБФЙЕН ОБ ЛМБЧЙЫХ F7 ЙМЙ F8.
чПРТПУ 11
лПОУФТХЛГЙСљ ФЙРБ чщвпт (чбтйбоф)
1 рТЙНЕТ РТПЗТБННЙТПЧБОЙС ОБ СЪЩЛЕ рБУЛБМШ У ЙУРПМШЪПЧБОЙЕН ЛПОУФТХЛГЙЙљ чщвпт .
{...}
program casep;
const c=10;
var n1,n2:integer;
beginљљ
љљ write('чЧЕДЙФЕ n1,n2:');љ readln(n1,n2);
љљ writeln('йУИПДОЩЕ ДБООЩЕ: n1=',n1,'љ n2=',n2,'љ c=',c);
љљ writeln('n1+n2=',n1+n2);
љљ write('тЕЪХМШФБФ: ');
љљ case n1+n2 of
љљљљ 2:љљљљљљљљљљ љљљљљљљљљљ writeln('n1+n2=2');
љљљљ 1,3:љљљљљљ љљљљљљљљљљљ writeln('n1+n2=1 OR 3');
љљљљ 4..9:љљљљљ љљљљљљљљљљљ writeln('4<=n1+n2<=9');
љљљљ c:љљљљљљљљљљ љљљљљљљљљљ writeln('n1+n2=',c);
љљљљ -5..0,11..15:љљљ writeln('-5<=n1+n2<=0 OR 11<=n1+n2<=15')
љљљљ else writeln('n1+n2<-5 OR 15<n1+n2')
љљ end{case};
љљ readln
end.
2 тЕБМЙЪБГЙС ЛПОУФТХЛГЙЙ чЩВПТ ОБ СЪЩЛЕ РТПЗТБНЙТПЧБОЙС.
Case ЧЩТБЦЕОЙЕљ of
љљ УПЧПЛХРОПУФШ ЛПОУФБОФ1љ : ппу1;
љљ УПЧПЛХРОПУФШ ЛПОУФБОФ2љљ : ппу2;
љљ УПЧПЛХРОПУФШ ЛПОУФБОФ : ппу;
љљљ else ПРЕТБФПТ РТПУФПК ЙМЙ УЕТЙС ПРЕТБФПТПЧ
end; {Case}
3 лПННЕОФБТЙК Л ЖТБЗНЕОФХ РТПЗТБННЩ ТЕБМЙЪХАЭЕНХ ЛПОУФТХЛГЙА чЩВПТ:
Б) ЧЩРПМОСЕФУС ФПМШЛП ФПФ ПРЕТБФПТ ПДЙОПЮОЩК ЙМЙ УПУФБЧОПК (ппу), ЛПОУФБОФБ ЛПФПТПЗП ТБЧОБ ЪОБЮЕОЙА ЧЩТБЦЕОЙС;
В) Ч УМХЮБЕ, ЕУМЙ Ч ХЛБЪБООЩЕ УПЧПЛХРОПУФЙ ЛПОУФБОФ ОЕ ЧИПДЙФ ОЙ ПДОБ ЛПОУФБОФБ ТБЧОБС ЪОБЮЕОЙА ЧЩТБЦЕОЙС, ФП ЧЩРПМОСЕФУСљ else ЮБУФШ.
ч УМХЮБЕ, ЕУМЙ Ч else џОЕ ЧИПДЙФ ОЕ ПДЙО ПРЕТБФПТ, ФП else ЮБУФШ НПЦЕФ ВЩФШ ПРХЭЕОБ, ФПЮОП ФБЛЦЕ ЛБЛ Й Ч ОЕУФТХЛФХТЙТХЕНПК ЖПТНЕ ПРЕТБФПТБ еумй - фп.
Ч) ФЙР ЧЩТБЦЕОЙС Й ЛПОУФБОФ ДПМЦЕО УПЧРБДБФШ, Й ОЕ ДПМЦЕО ВЩФШ ФЙРБ real Й string, ПО НПЦЕФ ВЩФШ, ОБРТЙНЕТ ФЙРБ integer;
З) УПЧПЛХРОПУФШ ЛПОУФБОФ НПЦЕФ ЪБДБЧБФШУС Ч ЧЙДЕ ПДОПЗП ЙМЙ ОЕУЛПМШЛЙИ ДЙБРБЪПОПЧ.
ä) â else ЮБУФЙ ОЕ ФТЕВХЕФУС ЙУРПМШЪПЧБФШ ПРЕТБФПТОЩЕ УЛПВЛЙ, ДБЦЕ Ч УМХЮБЕ ОЕПВИПДЙНПУФЙ ТБЪНЕЭЕОЙС Ч ОЕК УЕТЙЙ ПРЕТБФПТПЧ (ЖХОЛГЙЙ ПРЕТБФПТОЩИ УЛПВПЛ ЧЩРПМОСАФ УМПЧБ else Й end).
4 уИЕНБ ЛПОУФТХЛГЙЙ ЧЩВПТ.
|
|
|
|
|
|
|
|
|
|
|
|
|
чПРТПУ 12
рТПЗТБННЙТПЧБОЙЕ ЧЕФЧМЕОЙС ОБ уЙ++
МЕЛГЙС 5