одномерный массив

08.06.2010, 13:30. **Показов** 985. **Ответов** 1

Студворк — интернет-сервис помощи студентам

дан одномерный массив строковых переменных Р(9) по 4 символа.определить есть ли среди них слово "КОЛЯ". Не пойму че тут надо сделать.

@Mиxaил · 08.06.2010, 16:03

Pascal

const N=9;
var p:array[1..N] of string;
    i:integer;
    flag:boolean;
begin
for i:=1 to N do
  readln(p[i]);
flag:=false;
for i:=1 to N do
  if (p[i]='коля') or (p[i]='КОЛЯ') or (p[i]='Коля') then 
    begin
      flag:=true;
      break;
    end;
if not flag then writeln('No')
  else writeln('Yes');
readln;
end.

Mixail876
		1
	одномерный массив 08.06.2010, 13:30. Показов 985. Ответов 1 Метки нет (Все метки) дан одномерный массив строковых переменных Р(9) по 4 символа.определить есть ли среди них слово "КОЛЯ". Не пойму че тут надо сделать.

Опции темы

одномерный массив

Решение