67

Помогите решить задачуЗаданы два массива А (5) и В (5). Подсчитать в них количество…

26 марта 2023

Помогите решить задачуЗаданы два массива А (5) и В (5). Подсчитать в них количество элементов, меньших значения t и первым на печать вывести массив, имеющий наибольшее их количество.

категория: информатика

80

Program mas2; uses crt; vara: array[1… 5] of integer; b: array[1… 5] of integer; t,i,m1,m2: integer; beginrandomize; clrscr; writeln ('Vvedite T'); readln (t); for i: =1 to 5 do a[i]: =random (t+1); b[i]: =random (t+1); if a[i]m2 then begin for i: =1 to 5 do write (',a[i]) end else for i: =1 to 5 do write (',b[i]); writeln; end. Может не совсем красиво, но зато работает)

Знаете ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...