1)вывести в обратном порядке второе слово строки. подсчитать количество букв в нем. 2) составить программу для вычисления т=(r/q+1)+s. r - наименьший элемент массива; q - произведение элементов массива с нечетными номерами; s - количество элементов, лежащих в интервале (a,b) (ввести с клавиатуры). 3) вычислить среднее арифметическое положительных элементов матрицы, расположенных ниже побочной диагонали. закрасить указанные элементы.

231

431

Посмотреть ответы 2

Ответы на вопрос:

polli54

Информатика

4,8(67 оценок)

Var x: string; arr: array of char; begin readln(x); arr : = x.split(' ')[1].tochararray(); system.array.reverse(arr); writeln(length(arr), ' ', new string(arr)); end. var c: array of integer : = (10, 20, 10, 30, 40, 50, 55, 1, 5, 9, 4, 3, 2); r, q, s: real; i, a, b: byte; begin q : = 1; i : = 1; r : = c.min(); while (i < length(c)) do begin q *= c[i]; i += 2; end; readln(a, b); s : = b - a - 1; writeln('t = ', (r / q + 1) + s); end. const k = 5; p = 5; var f: array [1..k, 1..p] of string; o: real; df: byte; begin for i: byte : = 1 to k do begin for j: byte : = 1 to p do begin f[i, j] : = random(10, 99).tostring(); write(f[i, j]: 3); if (j > = 7 - i) then begin o += integer.parse(f[i, j]); df += 1; f[i, j] : = '██'; end; end; writeln(); end; writeln(); for i: byte : = 1 to k do begin for j: byte : = 1 to p do write(f[i, j]: 3); writeln(); end; writeln(o / df); end.

dgolovenko

Информатика

4,4(14 оценок)

var a,b,c,d: integer;

begin

writeln ('vvedite a');

read(a);

writeln ('vvedite b');

read(b);

writeln ('vvedite c');

read(c);

writeln ('vvedite d');

read(d);

if (a> b) and (a> c) and (a> d) then writeln('samoe bolshoe chislo - a')

else writeln('a ne samoe bolshoe');

end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

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