Дан массив из 10 целых чисел от -20 до 20 и целое число (вводится с клавиатуры).
5-9 класс
|
Напишите программу,определяющую,сколько в массиве чисел.
program chik;
var a:array[1..1000]of integer;
max,p,i:integer;
begin
for i:=1 to 10 do
begin
read(a[i]);
end;
max:=1;p:=1;
for i:=2 to 10 do
begin
if(a[i]>max)then begin
max:=a[i];
p:=i;
end;
end;
write(max,' ',p);
end.
ойй,не так написала
Дан массив из 10 целых чисел от -10 до 10 и целое число ,написать программу
определяющую максимальный элемент массива и его номер
элементы массива как задаются?
с клавиатуры или рандомно?
Дан массив из 10 целых чисел от -10 до 10 и целое число (а причем здесь и целое число)?
рандомно задаются
Другие вопросы из категории
играют и в симуляторы и в квесты, 6- симуляторы и стратегии, 4- квестам и стратегиям, а 9 не играют ни во что. Сколько школьников играют и в симуляторы, и в квесты, и в стратегии?
Читайте также
Входные данные: ввести два целых числа А,В (1 <=А,В<=10).
Входные данные: вывести произведение всех целых чисел от А до В включительно.
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.
то поменять местами третий и пятый элементы, если третий элемент равен нулю, то увеличить оба эти элементы в 2 раза, иначе третий и пятый элементы сохраняют прежние значения.
а) все целые числа от 20 до 35;
б) квадраты всех целых чисел от 10 до b (значение b вводится с клавиатуры; b >(или равно)10);
в) третьи степени всех целых чисел от a до 50 ( значение а вводится с клавиатуры; а<(или равно) 50);
г) все целые числа от а до b( значение а и b вводятся с клавиатуры; b>(или равно) а).