Дан массив A(n) символов. Найти сумму порядковых номеров символов п, р, с, т Подскажите умоляю, контрольная итоговая
Паскаль
Одномерный массив

Question

Информатика: Дан массив A(n) символов. Найти сумму порядковых номеров символов п, р, с, т Подскажите умоляю, контрольная итоговая Паскаль Одномерный массив

mrpekhterov · Answer

var  B: array [1..10] of string :=( а , р , ц , ь , т , в , ц , п , б , с );  total: integer; begin  for var i:= 1 to 10 do    begin    if B[i]= п then total:=total+i;    if B[i]= р then total:=total+i;    if B[i]= с then total:=total+i;    if B[i]= т then total:=total+i;    end;writeln(total);end.Объяснение:...