Определи способ заполнения массива. for i : = 1 to 4 do read(a[i]); 1 с оператора присваивания (по формуле) 2 ввод каждого значения с клавиатуры 3 с оператора присваивания (случайными числами)

2 var  3 s: string;   4 begin  5  readln(s); 6  while  pos('с',s)> 0  do  delete(s,pos('с',s),1); 7writeln(s);   8 end.это точно

число-общее

столица росси - единичное

учебник - общее

житель москвы - общее

столица - общее

самая высокая гора - единичное

пушкин - единичное

сказочный персонаж - общее

баба яга- единичное