petechkaPetrovPetor
07.06.2022 07:59

Підрахувати кількість від’ємних, додатних та нульових елементів. delphi. в массиве

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
ассасин32
03.07.2022 22:11

1)

Это задание делается в Экселе/Либре. Мы создаем таблицу ABCD и вниз от 1 до 4 как на рисунке. Далее подставляем по формуле каждое число и получаем

d1 = a1 - 2 * b1-4 * c$1

d1 = 5 - 2*3-4*0

d1 = 5-6=-1

2)

var

a,c,e,b : real;

begin

randomize;

write('a = '); read(a);

write('c = '); read(c);

write('e = '); read(e);

b:=random(100);

writeln('|a+c+e| = ', abs(a+c+e):0:3);

writeln('sqr(a+b) = ', sqr(a+b):0:3);

writeln('2*a - c = ', (2*a-c):0:3);

end.

3)

1199

Переписываем программу и вводим значение 5631.

var

x,a,b,c,s,m : integer;

begin

readln(x);

a:=x div 10;

b:=a mod 10 div 10;

c:=a div 100;

s:=x mod 1000;

m:=a+b+c+s;

writeln(m);

end.

0,0(0 оценок)
Ответ:
ArtLeg
01.03.2023 06:16

Dictionary<int, string> letter = new Dictionary<int, string>(2);

           letter.Add(1, "А");

           letter.Add(2, "Б");

           letter.Add(3, "В");

           letter.Add(4, "Г");

           letter.Add(5, "Д");

           letter.Add(6, "Е");

           letter.Add(7, "Ё");

           letter.Add(8, "Ж");

           letter.Add(9, "З");

           letter.Add(10, "И");

           letter.Add(11, "Й");

           letter.Add(12, "К");

           letter.Add(13, "Л");

           letter.Add(14, "М");

           letter.Add(15, "Н");

           letter.Add(16, "О");

           letter.Add(17, "П");

           letter.Add(18, "Р");

           letter.Add(19, "С");

           letter.Add(20, "Т");

           letter.Add(21, "У");

           letter.Add(22, "Ф");

           letter.Add(23, "Х");

           letter.Add(24, "Ц");

           letter.Add(25, "Ч");

           letter.Add(26, "Ш");

           letter.Add(27, "Щ");

           letter.Add(28, "Ъ");

           letter.Add(29, "Ы");

           letter.Add(30, "Ь");

           letter.Add(31, "Э");

           letter.Add(32, "Ю");

           letter.Add(33, "Я");

            Console.Write("Введите букву: ");

           char letterValue = Console.ReadKey(true).KeyChar;

           Console.WriteLine();

           Console.WriteLine($"{letterValue} - {char.ToLower(letterValue)-'a' + 1}");

Объяснение:

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота