Var dc:set of char; s1,s2:string; i:integer; begin dc:=['A'..'D','a'..'d']; s1:='То avoid the impression of the tail wagging the dog, '+ 'the president cannot be seen bending to the wishes of a minority.'; s2:=''; for i:=1 to length(s1) do if not(s1[i] in dc) then s2:=s2+s1[i]; Writeln('Исходная строка: ',s1); s1:=s2; Writeln('Результирующая строка: ',s1) end.
Тестовое решение: Исходная строка: То avoid the impression of the tail wagging the dog, the president cannot be seen bending to the wishes of a minority. Результирующая строка: То voi the impression of the til wgging the og, the presient nnot e seen ening to the wishes of minority.
ответ:1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
#include<iostream>
#include<conio.h>
void main()
{
int a;
int m;
puts ("Определение максимального положительного числа\n");
puts ("Вводим числа для завершения введите 0");
m=0;
do
{
printf(" | ");
scanf("%i",&a);
if (a>m)
{
m=a
}
}while(a>0);
printf("Максимальное число :%i",m);
printf("Для завершения введи Enter");
getch();
}
Объяснение: