Пожалуйста!!! срочно помогите!!100 баллов 1.Составить программу на Паскале для обработки одномерного массива из 10 элементов. Значения элементов задать вводом с клавиатуры самостоятельно. Посчитать количество и напечатать номера элементов, которые больше 5. 2.Составить программу на Паскале, которая удалит все буквы «о» из текста, который состоит из 6 слов. Текст нужно придумать самостоятельно Сделайте, пожалуйста, сами!
Ответ:1.1
2.11
2
3
4
5
6
7
8
9
10
11
12
var
s, s1, s2: string;
begin
readln(s);
s1 := s;
s2 := s;
delete(s1, pos(' ', s1), 1);
while pos(' ', s2) <> 0 do
delete(s2, pos(' ', s2), 1);
writeln(s1);
writeln(s2);
end.
Объяснение:держи друг)
