В текстовом редакторе имеется текст, состоящий из трёх абзацев: Абзац 1
Абзац 2
Абзац 3
Учитель предложил ученику выполнить алгоритм, команды которого представлены в таблице.
Как изменится исходный текст после выполнения алгоритма?
Заполните таблицу, отразив в ней результаты выполнения операций.
№ Команда
Результат выполнения команды на экране
1 Выделить абзац 1 Будет ответ
выделен 1 абзац
2 Выполнить команду
Правка -> Копировать Будет ответ
скопирован
выделенный ответ
абзац
3 Установить курсор в
начало абзаца 2 Курсор будет установлен
перед ответ
первым
словом ответ
абзаца
4 Выполнить команду
Правка -> Вставить На месте курсора появится копия абзаца ответ
,
а остальные абзацы опустятся ответ
вниж
. Курсор
останется перед абзацем ответ
.
5 Нажать клавишу
Enter После копии абзаца ответ
появится ответ
строка.
6 Выделить
абзац 3 Будет выделен последний ответ
7 Выполнить команду
Правка -> Удалить Будет удалён ответ
. Курсор будет находится
в ответ
строки после абзаца ответ
.
ответьте на все части вопроса
#include <iostream>
#include <windows.h>
using namespace std;
int main()
{
int N;
int* arr;
cin>>N; //вводим размер массива
arr = new int[N];
for(int i=0;i<N;i++) cin>>arr[i]; //вводим сам массив
int NumOfFives = 0;
for(int i=0;i<N;i++)
{
if(arr[i]==5) NumOfFives++;
}
cout<<NumOfFives<<endl; //выводим сколько пятёрок
Sleep(5000); //ждём 5 секунд.
delete arr;
return 0;
}
/*
P.S Так на будующее: не алгоритм, а программу; C++ не программа, а язык; за такие задачи нужно побольше пунктов давать(мало кто знает C++(тут), а также задачи тут бывают полехче (куда уж легче? но бывают!) а пунктов ты даёшь минимум).
*/
1)
var
str : string;
begin
readln (str);
writeln (length (str) - pos (':', str));
end.
2)
var
str, s : string;
count, i : integer;
begin
readln (str);
s := copy (s, pos ('(', str) + 1, pos (')', str) - pos ('(', str) - 1);
count := 0;
for i := 1 to length (s) do
if s[i] = ' ' then inc (count);
writeln (count + 1);
end.
3)
var
str : string;
count : integer;
begin
readln (str);
count := 0;
while pos (',', str) > 0 do
begin
inc (count);
delete (str, pos (',', str), 1);
end;
writeln (str);
writeln (count);
end.
Сделано без проверки на соответствие условию.