Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
1Nicol1
19.05.2020 15:56 •
Информатика
(33 ) перепишите программу на паскале, исправив ошибки: program massiv; var a: array(-10..10) of integer; begin for i: =1 to 20 do read(a[i]); for i: =1 to 20 do a[i]: =a[i]/10; for i: =1 to 20 do write(a[i]) end.
Показать ответ
Ответ:
rmnikkp00szv
06.10.2020 10:01
Var
a: array[-10..10] of real;
i: integer;
begin
for i := -10 to 10 do begin
Read(a[i]);
a[i] := a[i] / 10;
Write(a[i]+' ');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Dollyy
18.03.2023 22:11
Условным обозначением блока начала и конца в блок-схеме является …...
StanleyPines618
15.04.2020 14:23
Диапазон с4: е5 электронной таблицы содержит сколько ячеек? !...
Dyadya11
02.05.2021 09:46
Ввести n чисел с клавиатуры и найти произведение чисел, оканчивающихся на 7. паскаль 7 класс...
рами0208
29.07.2022 08:32
Пункты а и в находятся на расстоянии 65 км.из а в в выехал велосипедист со скоростью 12 км/ч и одновременно из b в а выехал велосипедист со скоростью 14 км/ч.расстояние...
Tara8808
29.07.2022 08:32
Определите вид подчинительной связи в словосочетаниях болезненно нерешительный расцвеченный огнями рагу из баранины требовательный к ученикам при первой встрече в...
кирил2088
29.07.2022 08:32
Нужно указать область определения функции: f(x)=3x-21 √40-3x-x² всё в корне! !...
улгкармцрваейьоц
29.07.2022 08:32
Напишите сочинение как я лето.на 1лист я был в деревне...
danillirka
29.07.2022 08:32
Тема и оснавная мысль высказывания: перед вами громада - язык. наслаждение глубокое зовет вас,наслаждение погрузиться во всю неизмеримость его и изловить чудные законы...
putin006
29.07.2022 08:32
Разложите числа на простые множители 1) 4104 2)5544...
foma2004korol
29.07.2022 08:32
Предложение там уж вправо-влево не свернёшь. это односоставное определённо личное?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a: array[-10..10] of real;
i: integer;
begin
for i := -10 to 10 do begin
Read(a[i]);
a[i] := a[i] / 10;
Write(a[i]+' ');
end;
end.