сервис вопросов и ответовВ массиве B1, B2, ... Bn найти первое положительное число и напечатать его номер. Язык програмирования ПАСКАЛЬ
10-11 класс|
|
Kristina2710200
10 февр. 2017 г., 8:06:25 (7 лет назад)
кукушкаккккк
10 февр. 2017 г., 9:58:18 (7 лет назад)
program XXX;
var i, n, k : integer;
b : array [1..100] of real;
begin
write ('введите n=');
readln(n);
write ('введите массив b :');
for i:=1 to n do
read(b[i]);
k:=0;
i:=1;
while (i<=n) and (k=0) do
if b[i]>0 then k:=i else i:=i+1;
if k=0 then write('положительных элементов - нет')
else write('номер первого положительного элемента-', k )
end.
Ответить
Другие вопросы из категории
текст составлен с использованием алфавита мощностью 128 символов и состоит из 3 страниц. на каждой странице 40 строк по 60 символов. найти информационный
объем текста в килобайтах
Ваш друг сообщил: «Я живу на втором этаже в третьем подъезде 2-
этажного дома. В доме 4 подъезда. На каждом этаже 4 квартиры».
Какое количество информации Вы получили
написать Асемблер
1. Написать
программу для нахождения числа нулевых элементов в массиве из 10 знаковых
чисел.
Читайте также
1)дан одномерный массив из 5 элементов.найти сумму положительных элементов. 2)Дан одномерный массив из 7
элементов.Найти колличество четных положительных элементов.
3)Дан массив из 6 элементов.Найти произвдение положительных из них.
1) Задано положительное число A. Найти сумм всех четных чисел в интервале от 1 до A. Число А может иметь дробную часть.
2) Задано целое положительное число А и В. Найти квадратные корни целых чисел в интервале от А до В. Замечание: A<B
Теперь с двумерным массивом =/
Дано: массивы A1(N,B), A2(N2,M2), A3(N3,M3). Сформировать одномерные массивы B1,B2,B3, элементами каждого из которых являются количество единиц,двоек и троек в исходных массивах A1, A2, A3 соответственно. Формирование одномерного массива из трех элементов, содержащего количество единиц, двое и троек в исходном массиве, осуществить в подпрограмме и изобразить блоксхему.
PascalABC, тут надо также : "неученым языком(начальным уровнем)" написать с подпрограммой через PROCEDURE.Уповаю на вашу помощь... Заранее спасибо!
ПАСКАЛЬ.1)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 1000.опишите на русском языке или на одном из
языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.
Вы находитесь на странице вопроса "В массиве B1, B2, ... Bn найти первое положительное число и напечатать его номер. Язык програмирования ПАСКАЛЬ", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.