1. Информатика
  2. Составьте программу ввода

Составьте программу ввода элементов массива b[1..6] с клавиатуры и вывода на экран элементов с положительными значениями.

sponsor1776 sponsor1776    1   11.07.2019 14:30    0

Ответы
Anastasiia11111111 Anastasiia11111111  03.10.2020 01:18
Var A:array[1..100] of Integer;
i,N:integer;
begin
Readln(N);
For i:=1 to N do
Readln(A[i]);
For i:=1 to N do
If A[i]>=0 then
Write(A[i],' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
AYSEL2009 AYSEL2009  22.09.2019 17:30
Скаких средств получается растровая и векторная информация?...
aimnura73 aimnura73  22.09.2019 17:30
Дан целочисленный массив, состоящий из 15 элементов. отсортировать элементы этого массива по возрастанию, вывести получившийся массив на экран...
Инфузорияяя Инфузорияяя  22.09.2019 17:30
Какой представления графической информации экономнее использовать в памяти...
sofialesiuk sofialesiuk  22.09.2019 17:30
Информатика 4 класс нарисуй рисунок в масштабе с координатами...
r0ma000 r0ma000  22.09.2019 17:30
Выдать на экран сообщение, попадет ли в круг с длиной окружности l(см) точка с координатами (a, b). центр круга расположен в начале координат....
jonjonson jonjonson  22.09.2019 17:30
A1-3 b1-6 a2-4 b2-2 c1 =a1+2*b1 d2=a2^2+b2 1)чему равно значение вычисляемое по формуле в ячейке c1 2)чему равно значение вычисляемое по формуле d2...
IlyaLzt IlyaLzt  22.09.2019 17:30
Запиши, чем цикл, повторяющийся при выполнении условия, отличается от цикла, повторяющегося до выполнения условия....
enterfight enterfight  22.09.2019 17:30
Информатика ! составить программу в паскале, в которой с клавиатуры вводятся 2 текстовых выражения, вычисляется и печатается длина каждого из них. в первом выражении все...
maksimtihonov34 maksimtihonov34  22.09.2019 17:40
Язык с++ : в одномерном массиве, что состоит с n действительных элементов, вычислить: 1) минимальный непарный элемент массива; 2) суму элементов массива, что размещены после...
atsaruk2002 atsaruk2002  22.09.2019 17:40
50 ! переделать чтобы упоряд. по возврастанию нач. с выставки минимального элемента на 1-ое число. for i: =1 to n do begin a[i]: =random writeln(a[i], ); end; for j: =n-1...

Популярные вопросы