Ые являются 1. определите понятия, которые явле нием множеств. а) малина, ежевика, голубика, брусника, - id984430020220310 от ввіна 10.03.2022 11:39

Question

Информатика: Ые являются 1. определите понятия, которые явле нием множеств. а) малина, ежевика, голубика, брусника, земляни б) капуста, морковь, лук, огурец, помидор; в) яблоко, груша, слива, персик; b) mhc г) мне д) мін б) г) волк, заяц, лиса, медведь; д) корова, коза, свинья, собака, котка; е) 0, 1, 2, 3, 4, 5, 6, 7, 8, 9; ж) а, е, е, и, о, у, ы, э, ю, я; - 3) клавиатура, мышь, сканер, микрофон.​

ввіна · Accepted Answer

//PascalABC.NET 3.2 сборка 1318 //1 Var   s,maxs:string;   i,max,j,len:integer; begin max:=-1; readln(s); var ars:=s.Split; for i:=0 to ars.length-1 do begin len:=0;   for j:=1 to ars[i].length do     if (lowcase(ars[i][j]) = a ) and (lowcase(ars[i][j]) = z ) then         inc(len); if ars[i].length=max then     maxs+=chr(13)+ars[i]+ +len; if ars[i].length max then     begin       maxs:=ars[i]+ +len;       max:=ars[i].length;     end; end; write(maxs); end. Пример ввода: Steins;Gate is fine VN, 12345678910...

MOGZ ответил