1. Информатика
  2. Вывести на экран все ненулевые

Вывести на экран все ненулевые элементы, заданного массива из десяти любых целых чисел

елена251178 елена251178    1   15.06.2019 18:00    18

Ответы
anton2015b anton2015b  12.07.2020 19:56
Var a:array[1..10] of real; i:integer;
begin
for i:=1 to 10 do readln(a[i]);
for i:=1 to 10 do if a[i]<>0 then write(a[i],' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
alinkaaa888 alinkaaa888  24.09.2019 18:11
Выбери любой объект, рассмотри его, назови его имя,назначение,форму, цвет,размер,действия отношения....
ralina27 ralina27  14.08.2019 03:10
Сос ! в файле решите зарание ! если можно то с оъяснением !...
школа21002100 школа21002100  14.08.2019 03:10
1) подготовить таблицу ms excel для расчета площади s и периметра p прямоугольника по известным размерам его сторон a и b. таблица должна иметь заголовок....
pain26 pain26  23.03.2021 18:10
2в 16степени байт выразить в бит...
ksusha020504 ksusha020504  23.03.2021 18:13
Використати random.randint Модуль random надає функції для генерації випадкових чисел, букв, випадкового вибору елементів послідовності.random.randint (A, B) - випадкове...
visaenko1974 visaenko1974  23.03.2021 18:14
Представьте целое число со знаком в формате с фиксированной запятой (ФЗ) (-238) в десятичной СС...
alexvelova alexvelova  08.04.2020 09:46
Информатика 1) Замени восьмеричную цифру 0 тремя двоичными цифрами (триадой)!2) Замени тетраду из двоичных цифр 1111 соответствующей шестнадцатеричной цифрой!...
PleaseHelpMe4 PleaseHelpMe4  08.04.2020 09:46
1. Запишем на языке Паскаль рассмотренный в п. 2.4.2 (пример 8) алгоритм определения принадлежности точки х отрезку [а, b]....
andreyusachevp0cxzy andreyusachevp0cxzy  08.04.2020 09:46
Какой тег не следует использовать для установки цвета шрифта?...
Ондруй Ондруй  13.03.2022 01:41
6. В электрочайнике есть предохранитель. Ниже приведены допустимые значения предохранителей. 1 А 3 А 7 А 13 А Какое значение соответствует приведенному выше электрическому...

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