Предмет: Информатика, автор: kiryhay

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

Ответы

Автор ответа: Endok
0
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.
Автор ответа: student365
0
Вы уверены, что Ваша программа правильно работает?
Автор ответа: kiryhay
0
Предложите свой вариант
Автор ответа: Endok
0
Да
Автор ответа: Endok
0
Пример вводишь количество элементов 6, а потом по одному 6 чисел вот так: 6 -1 0 -2 -3 2 3
Автор ответа: kiryhay
0
Аа. Понял
Интересные вопросы
Предмет: Другие предметы, автор: gorbunovaelena837
Предмет: Русский язык, автор: vikaankovskaa96