tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Задан массив из 20 элементов,содержащий
Задан массив из 20 элементов,содержащий только натуральные числа.написать программу которая определяет есть ли нули в этом массиве и выводит на экран(есть или нет)
Klininoolp
3 25.09.2019 04:40
0
Ответы
MuxaBirko
08.10.2020 17:46
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger(20);
if a.Any(t->t=0) then Writeln('В массиве есть нули')
else Writeln('В вмессиве нет нулей')
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
Ytbjfdg
20.04.2020 20:38
В программе «:=» обозначает оператор присваивания, знаки «+», «-», «*» и «/» — соответственно операции сложения, вычитания, умножения и деления. Правила выполнения операций...
Glowly
20.04.2020 20:43
Як зробити щоб два виконавця рухалися назустріч друг к другу поки не буде натиснуто клавишу ,,пропуск ?...
главныймозг74
20.04.2020 20:39
: В среде симулятора создать проект, который в цикле по нажатию на кнопку последовательно включает красный, желтый и зеленый светодиод. В режиме нажатие – загорается светодиод,...
givemepizza
20.04.2020 20:43
ҚР цифрландыру тақырыбында эссе жаз. 1.ҚР цифрландыру үшін қандай жұмыстар жасалу керек? 2.ҚР цифрландыру үшін қандай саланы дамыту керек? 3.ҚР цифрландыру үшін өзің не істер...
Aleksey4569
20.04.2020 20:41
Определите значение переменной b после выполнения фрагмента алгоритма...
пппп103
20.04.2020 20:45
Укажите истинные высказыванияУкажите один или несколько правильных вариантов ответа:1Компьютер управляет работой связанных с ним технических устройств по выполнению алгоритмов2Человек...
matthewfeat
20.04.2020 20:45
Определите значения переменных M и N после выполнения данной блок-схемы.ответM=N=...
ViNtIk4312
20.04.2020 20:46
После того как загрузится программа MS Paint, на экране появится главное окно. Выбери то место на картинке, где размещены все доступные меню....
svinka03
20.04.2020 20:54
Определите значения переменных M и N после выполнения данной блок-схемы. M= N=...
Zagitova112
20.04.2020 20:54
4. Запишите число, которое будет напечатано в результате выполнения следующей программы var s, n: integer; begin s := 32; n := 1; while s * n 1000 do begin s := s div 2; n :=...
Популярные вопросы
Создать блок-схему и программу расчета...
1
При проведении проверки по соблюдению трудового законодательства государственный...
1
Уравнение химической реакции (записываем реакцию горения: гексадиен – 1,3...
1
При анализе латуни из ее навески 0,65 г получено 0,52 г осадка ZnNH4PO4....
1
Астрономия Основные линии на небесной сфере, позволяющие наблюдателю ориентироваться...
2
Расположите числа в порядке возрастания √5,√(7,) 2,5 1) 2,5,√5,√(7,)2) √5,...
3
Расшифруйте число 1,01e+12...
1
Определите время, в котором написаны предложения, переведите предложения...
2
Исследовать функцию y=x^3-3x^2 с производной и построить схематический график....
2
Яка панель інструментів програми foxit reader...
2
Внимание! Если программа не работает, обновите версию!
begin
var a:=ReadArrInteger(20);
if a.Any(t->t=0) then Writeln('В массиве есть нули')
else Writeln('В вмессиве нет нулей')
end.