Составить программу на паскаль. слова могут содержать любые символы языка. найти и вывести в самом длинномслове все символы, отличные от заглавных латинских букв. использовать множества.

Var       a            : array of string;   str, m: string; begin   readln(str);   a : = str.split(' ');   foreach str in a do     if (m.length < str.length) then       m : = str;   foreach kchr: char in m do     if not (kchr in ['a'..'z']) then       write(kchr); end.

Програма будет иметь такой вид .  посколько я привык работать в среде с++ прогу. зделаю там же .  #include< iostream>   - стандартная библиотека iostream  using namespace std; int main () { setlocale(lc_all,"rus"); - подключаем язык "rus" int a,b,c;     а-первое число b-второе с-третие cout< < "введите значение числа а"< < endl; cin> > a;   cout< < "введите значение числа b"< < endl; cin> > b; cout< < "введите значение числа c"< < endl; cin> > c; if(a=b=c) cout< < "числа равны"< < endl; else cout< < "числа не равны"< < endl; system("pause"); return 0; }  ето прога .                                              алгоритм                                  в овале перевернутом  начало                                    в паралелограме ввод а,b,c                                              в ромбе а=b и a=c  если да                                                                            если нет  в паралелограме числа равны    в паралелограме числа не равны                                                                    в овале перевернутом конец    

для 2 чисел :

#include< iostream>

#include< conio.h>

using  namespace  std;

void  main()

{

setlocale(lc_all,"russian");

int  a,b,c;

cout< < "введите два числа\n";

cin> > a> > b;

c=(a> b)? a: b;

cout< < "max="< < c;

_getch();

}

для 3 чисел:

#include< conio.h>

#include< iostream>

using  namespace  std;

void  main()

{

setlocale(lc_all,"russian");

float  a,b,c;

cout< < "введ1ть 3 числа\n";

cin> > a> > b> > c;

if(a> b& & a> c) cout< < a;

else

if(b> a& & b> c) cout< < b;

    else cout< < c;

      _getch();

}