М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
hahahagall
hahahagall
24.03.2020 22:00 •  Информатика

11. Установіть відповідність між діями та інструментами для їх виконання. а)намалювати трикутник
б)додати до малюнка текстове пояснення
в)зафарбувати деяку замкнену область малюнка
г) зобразити прямокутник
д) зафарбувати деяку замкнену область малюнка
з ефектом розпилювання

1 розпилювач
2 прямокутник
3 багатокутник
4 заливка
5 напис


11. Установіть відповідність між діями та інструментами для їх виконання. а)намалювати трикутникб)до

👇
Открыть все ответы
Ответ:
vikimeis2006
vikimeis2006
24.03.2020
Using System;

public class Test
{
    public static int Main()
    {
        Random rnd=new Random(DateTime.Now.Millisecond); // иниц. датчика
        int n=Convert.ToInt32(Console.ReadLine());
        double[] Arr=new double[n];
        double e, max=0;
        for(int i=0;i<Arr.Length; i++)
        {
            Arr[i]=(int)(rnd.Next(1,99));
            Console.Write(Arr[i]+" ");
            e=Math.Abs(Arr[i]);
            if(e>max) max=e;
        }
        Console.WriteLine("\nmax={0:f1}",max);
        return 0;
    }
}

Пример
15
56 9 1 94 34 42 46 71 2 27 91 37 54 31 66
max=94.0
4,8(99 оценок)
Ответ:
кёрс23
кёрс23
24.03.2020
Var 
s,s1,s2,st1,st2:string; i:integer; 
mn:set of char; b:boolean;
begin
writeln('Введите текст:');
readln(s);
s:=s+' ';
st1:=''; st2:='';
s1:=''; s2:=''; mn:=[]; b:=false;
while pos('  ',s)>0 do delete(s,pos('  ',s),1);
for i:=1 to length(s) do
 if s[i]<>' '
  then begin 
       s1:=s[i]+s1;
       s2:=s2+s[i];
       if s[i] in mn then b:=true;
       mn:=mn+[s[i]];
       end
  else begin
       if s1=s2 then st1:=st1+s1+' ';
       if not b then st2:=st2+s2+' ';
       s1:=''; s2:=''; mn:=[]; b:=false;
       end;
if st1<>''
 then writeln('Слова-перевёртыши: ',st1)
 else writeln('Слов-перевёртышей нет');
if st2<>''
 then writeln('Слова без повторяющихся букв: ',st2)
 else writeln('Слов без повторяющихся букв нет');
end.

Пример:
Введите текст:
заказ слово комок  пробел след пример огонь текст
Слова-перевёртыши: заказ комок 
Слова без повторяющихся букв: пробел след 
4,4(1 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ