tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Ввод 10 элементов , вывод
Ввод 10 элементов , вывод только нечетные. язык - pascal abc
TimaWarface
2 08.09.2019 05:40
0
Ответы
lizadruzhinina1
07.10.2020 00:17
Var a: array [1..10] of integer;
i:integer;
begin
for i:=1 to 10 do read(a[i]);
for i:=1 to 10 do if a[i] mod 2<>0 then write(a[i],' ');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
irinakholod
02.12.2020 16:58
Нужно решить два примера. Определи результат выполнения алгоритма при определенных значениях исходных данных 2) A=6; B=6; C=-103) A=6; B=10; C=-10...
novikdary14
02.12.2020 16:57
это очень ответьте на 1 и 2 вопросы очень...
таиса10
02.12.2020 16:56
Помагите помагите помагите помагите помагите помагите помагите ...
ЧерепашкаВася
02.12.2020 16:54
Визначення оптимального асортименту, що максимізує прибуток Вихідні дані: меблева фабрика виготовляє столи, стільці, бюро й книжкові шафи, використовуючи два різних види дощок,...
Настіяа
02.12.2020 16:53
Напишите следующие выражения на языке Паскаль: а) 25^20+|1-у^2|;б) [5m]+{100b};B) x sina+y cosb--5^2;r) sinsin x+cossin y;...
Быковских
02.12.2020 16:52
Найти ответ на вопросы по информатике дана таблица определите тип данных ячейки А5...
olegkuchmak
02.12.2020 16:52
Вопросы для размышления 1)Как можно создать модели в программе SketchUp? 2)Каковы функции инструментов управления пространством в программе SketchUp? 3) для выполнения каких действий...
Yaklaura
02.12.2020 16:52
По Информатике 4.Продолжите следующие предложения;...
ekaterina791
02.12.2020 16:52
Для записи секретного сообщения был использован алфавит мощностью в 4096 символа(ов). Сообщение состояло из 53 строк. В каждой строке вместе с пробелами было 301 символа(ов). Сколько...
Камилия311
02.12.2020 16:52
Мне надо придумать кроссворд(готовый) про информатику ...
Популярные вопросы
решить всё! Нужно только ответы...
1
Ребят составьте 5 предложений на казахском с этими словами...
1
Mr(CuN2O6) маликулярный разбор...
2
Заповніть таблицю, указавши, у яких сферах людської діяльності використовуються...
2
Представьте число 8 в виде дроби со знаменателем 6. ...
3
площадь одного поля 185118 квадратных метров а другого в три раза больше на.сколько...
1
З ясуйте, яку інформацію за сприйняття отримують діти, і розгадай кроссворд...
2
Для детского дома купили фрукты . Яблок - 46 кг , груш на 12 кг меньше , чем...
3
Знайди хибні висловлювання 1)Джордано Бруно був послідовником вчення Птолемея.2)...
3
Как происходит половой акт между женским и мужским полами. ВНИМАНИЕ:КАК ЭТО...
2
i:integer;
begin
for i:=1 to 10 do read(a[i]);
for i:=1 to 10 do if a[i] mod 2<>0 then write(a[i],' ');
end.