«аочное дистанционное образование с получением государственного диплома через Internet










ѕолучить информацию о поступлении
 
√лавна€ Ќовости  арта сайта ‘отоальбом √остева€ книга  онтакты

{LTS}

 

”пражнение 1 (ќбработка числовых последовательностей)

¬водитс€ последовательность из N целых чисел. Ќайти сумму всех отрицательных чисел.

 
PROGRAM PRG2_1;

VAR N, X, SUM, I : INTEGER;

BEGIN

REPEAT

WRITE('BBEƒ»TE ƒЋ»Ќ” ѕќ—Ћ≈ƒќ¬ј“≈Ћ№Ќќ—“» N = ');

READLN (N);

UNTIL N>0;

SUM := 0;

FOR I := 1 TO N DO

BEGIN

WRITE('BBEƒ»TE X = ');

READLN (X);

IF X<0 THEN SUM := SUM+X

END;

ELSE

WRITELN('ќ“–»÷ј“≈Ћ№Ќџ’ „»—≈Ћ Ќ≈“')

END

WRITELN('C”MMA ќ“–»÷ј“≈Ћ№Ќџ’ „»—≈Ћ SUM = ', SUM);

END.

ƒл€ решени€ задачи:

- формируем тело программы и описываем переменные;

- вводим длину последовательности N и устанавливаем начальное значение SUM;

- последовательно считываем числа, и если число отрицательное, то прибавл€ем его к сумме SUM;

- в зависимости от значени€ SUM выводим результат.

ѕеременные:

N - количество чисел;

I - переменна€ цикла;

X - очередное число;

SUM - сумма отрицательных чисел.


”знать как сэкономить в кризис моно на сайте ekonom-it.ru

”пражнение 5 (ѕроизвод€щие функции и р€ды) ”пражнение 6 (ѕроизвод€щие функции и р€ды) ”пражнение 7 (ѕроизвод€щие функции и р€ды)  омпьютерный сленг (” и ‘) «адачи на тему "ќбработка числовых последовательностей" ”пражнение 2 (ќбработка числовых последовательностей) ”пражнение 3 (ќбработка числовых последовательностей) ”пражнение 4 (ќбработка числовых последовательностей) «адачи на тему "—имвольные переменные и строки" ”пражнение 1 (—имвольные переменные и строки) 


 
     
   
 


ѕриглашаем прин€ть участие в круглом столе!
подробнее   >>>
 

»нститут ћенеджмента, Ёкономики и »нноваций начинает набор на курсы повышени€ квалификации!
подробнее   >>>
 

”важемые студенты јЌќ ¬ѕќ »ћЁи»!
подробнее   >>>
 

Ќачинаетс€ набор на курсы повышени€ квалификации!
подробнее   >>>
 

ѕриглашаем прин€ть участие в конференци€х!
подробнее   >>>
 


все новости...

 


–ассылки Subscribe.Ru
—овременное образование
ѕодписатьс€ письмом