Информатика | 10 - 11 классы
Помогите решить в Паскаль Ввести массив из 12 вещественных чисел.
Найти наибольшее число из элементов с нечетными значениями и вывести на экран.
Ввести массив из 10 символов(русских букв) удалить из него элементы, равные последнему и предпоследнему символам.
Полученный новый массив вывести на экран.
Помогите пожалуйста?
Помогите пожалуйста!
Ввести c клавиатуры массив из 5 элементов, умножить их на 2 и вывести на экран.
(Pascal) Задача : Ввести массив из 5 элементов с клавиатуры?
(Pascal) Задача : Ввести массив из 5 элементов с клавиатуры.
Вывести элементы на экран и найти их сумму.
РЕШИТЕ ПОЗЯЗЯ!
Пожалуйста, помогите?
Пожалуйста, помогите.
Задали к понедельнику сделать, не успеваю.
1) Заполнить массив из 5 элементов четными значениями, начиная с 12.
Массив объявлен как var arr11 : array[1…5] of integer.
Вывести элементы на экран в одну строку через знаки двоеточия.
Сосчитать сумму элементов, вывести сумму на экран с новой строки.
2) Заполнить массив из 10 элементов целыми значениями от 20 до 11.
Массив объявлен как var arr12 : array[0…9] of integer.
Вывести элементы на экран в одну строку через пробел.
Ввести с экрана произвольный номер элемента массива и вывести его значение.
3) заполнить массив из 6 элементов нечетными значениями, начиная с 9.
Массив объявлен как var arr21 : [1…6] of integer.
Вывести элементы на экран в одну строку через знаки точка с запятой( ; ).
Сосчитать сумму элементов, вывести сумму на экран с новой строки.
4) Заполнить массив из 12 элементов целыми значениями от 30 до 19.
Массив объявлен как var arr22 : array [0…11] of integer.
Вывести элементы на экран в одну строку через пробел.
Ввести с экрана произвольный номер элемента массива и вывести его значение.
С клавиатуры ввести массив А (Б)?
С клавиатуры ввести массив А (Б).
Найти сумму всех элементов массива.
Вывести ее на экран, и массив опять.
Ввести строку символов определить и вывести на экран ее длину?
Ввести строку символов определить и вывести на экран ее длину.
Вывести на экран первый и последний символ этой строки.
Сгененировать случайным образом массив целых чисел из n элементов?
Сгененировать случайным образом массив целых чисел из n элементов.
N ввести со стандартного ввода.
Вывести на экран среднее арифметическое элементов.
Дан массив а, состоящий из 3 элементов, ввести элементы массива с клавиатуры и вывести на экран в обратном порядке?
Дан массив а, состоящий из 3 элементов, ввести элементы массива с клавиатуры и вывести на экран в обратном порядке.
Ввести в массив B(5) числа и вычислить корень квадратный из каждого элемента и вывести полученный массив на экран?
Ввести в массив B(5) числа и вычислить корень квадратный из каждого элемента и вывести полученный массив на экран.
Срочно!
(Информатика.
8 класс.
Паскаль ABC).
Заполнить массив случайным образом и вывести на экран сумму нечетных элементов?
Заполнить массив случайным образом и вывести на экран сумму нечетных элементов.
В паскале).
1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива 2) ввести с клавиатуры массив из n элементов вывести на экран максимальный?
1)ввести с клавиатуры массив из n элементов вывести на экран элементы меньшие среднего арифметического всех элементов массива 2) ввести с клавиатуры массив из n элементов вывести на экран максимальный четный элемент и минимальный нечетный элемент.
Вы перешли к вопросу Помогите решить в Паскаль Ввести массив из 12 вещественных чисел?. Он относится к категории Информатика, для 10 - 11 классов. Здесь размещен ответ по заданным параметрам. Если этот вариант ответа не полностью вас удовлетворяет, то с помощью автоматического умного поиска можно найти другие вопросы по этой же теме, в категории Информатика. В случае если ответы на похожие вопросы не раскрывают в полном объеме необходимую информацию, то воспользуйтесь кнопкой в верхней части сайта и сформулируйте свой вопрос иначе. Также на этой странице вы сможете ознакомиться с вариантами ответов пользователей.
/ / PascalABC.
NET 3.
2, сборка 1353 от 27.
11. 2016 / / Внимание!
Если программа не работает, обновите версию!
Begin var a : = ReadArrReal(12).
Select(x - > ; real(x)).
ToArray ; Writeln('Тип массива ', a.
GetType) ; Writeln('Максимальное нечетное : ', a.
Where(x - > ; Trunc(x).
IsOdd).
Max)
end.
Пример
13 10 22 31 22 6 18 5 26 3 8 24
Тип массива System.
Double[]
Максимальное нечетное : 31 / / PascalABC.
NET 3.
2, сборка 1353 от 27.
11. 2016 / / Внимание!
Если программа не работает, обновите версию!
Begin var c : = new Char[10] ; for var i : = 0 to 9 do c[i] : = ReadlnChar ; var c1 : = c[9] ; var c2 : = c[8] ; c : = c.
Where(a - > ; (a< ; > ; c1) and (a< ; > ; c2)).
ToArray ; c.
Println(', ')
end.
Пример
а
п
е
л
ь
с
и
н
е
ь
а, п, л, с, и, н.