За този блог

Публикации в този блог

• Подреди по
  • Последно обновени
  • Име
  • Дата
  • Най-коментирани
  • Прегледа

Прочети повече за Задачи

Задачи

Зад.1 Едномерен масив Декларирайте тип масив с име CLASS с 15 на брой елемента, които да са от целочислен тип. Декларирайте променливи А и В от този тип масив. Намерете и изведете сумата на елементите на масива A[15]. Program suma; TYPE class=Array[1..15] OF Integer; VAR A,B:class;I:Integer;S:Real; Begin FOR I:=1 TO 10 DO Begin Write('A[',I,']='); Readln(A); End; S:=0; FOR I:=1 TO 15 DO S:=S+A; Write('S=',S); Readln End. Зад.2 Едномерен масив Декларирайте тип масив с име

• 0 Коментари
• 622 прегледа

• BoReTo
• 4 юни 200818 г.

Прочети повече за ДВУМЕРЕН МАСИВ

ДВУМЕРЕН МАСИВ

* Deklarirane na tip masiw Type <ime na tip>=Array[M..N, M1..N1] OF <tip na elementite>; * Obqwqwane na promenliwi Var <spisuk s promenliwi>:<ime na tip masiw>; *Vuvejdane na elementi For I:=1 TO 10 DO FOR J:= 1 TO 20 DO Begin Write ('B[',I,',',J,']='); Readln(B[i,J]); End; *Izwejdane na elementi For I:=1 TO 10 DO For J:=1 TO 20 DO Writeln('B[',I,',',J,']=',B[i,J]); *Sumirane S:=O; FOR I:=1 TO 10 DO FOR J:=1 TO 20 DO S:=S+B[i,J]; *P

• 0 Коментари
• 1155 прегледа

• BoReTo
• 4 юни 200818 г.

Прочети повече за Едномерен масив

Едномерен масив

Едномерен масив *Deklarirane na Tip Masiw TYPE <ime na tip>=ARRAY[M..N] OF <tip na elementite>; *Obqwqwane na promenlivi VAR<spisuk s promenlivi>:<ime na tip masiv>; *VUVEJDANE NA ELEMENTI FOR I:=1 TO 10 DO Begin Write('A[',I,']='); Readln(A); End; *Izvejdane na elementi FOR I:=1 TO 10 DO Writeln('A[',I,']=',A); *Сумиране S:=0 FOR I:=1 TO 10 DO S:=S+A; *Proizvedenie P=1; FOR I=1 TO 10 DO P:=P*А; *Broi na elementi BR:=0 FOR I:=1 T

• 0 Коментари
• 1152 прегледа

• BoReTo
• 4 юни 200818 г.