tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дан массив. все его элементы
Дан массив. все его элементы увеличить на число b. написать пограмму в паскале
Таисия281
3 31.05.2019 02:30
1
Ответы
Reson1
01.07.2020 12:38
Const
N=10 //размер массива
Type
A=array[1..n]of real;
Var
I,B:integer;
Begin
For I=1 to n do
Read(a[i]); //ввели массив
Read(b);
For I=1 to n do
Begin
A[i]:=a[i]+b;
Write(a[i]);
End
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
elinakosogor30
04.07.2019 20:40
Информационный объем компьютерного текста равен 9 кб. текст занимает 6 страниц. в каждой строке 48 символов. информационний вес одного символа равен 8 битам. сколько строк находится...
ivancornij8
04.07.2019 20:40
1) объясните, почему следующие предложения не являются высказываниями. a) какого цвета этот дом? b) число x не превосходит единицы. c) 4x+3. d) посмотрите в окно. e) пейте томатный...
маркен2
04.07.2019 20:40
Информационное сообщение объемом 42 байта содержит 84 символа какова мощность алфавита...
firuzakushmano
04.07.2019 20:40
Перевидите двоичное число в 10-ную систему счисления110001...
angelinasestak
20.05.2019 07:00
Имеется садовый участок, имеющий форму прямоугольника со сторонами а и в метров.составьте программу,которая определит сколько досок надо купить, чтобы поставить сплошной забор. ширина...
sashakesha2006
20.05.2019 07:00
На уроці мальвіна запропонувала учням виконати такий алгоритм: 1)задумай число; 2)додай до числа 1; 3) помнож результат на 3; 4)поділи результат на 3; 5)відніми від результату 4; 6)...
Andreychic23
20.05.2019 07:00
Написать программу, которая бы по введенному номеру года (1 - зима, 2-весна, 3-лето, 4-осень) выдавала соответствующие этому времени года месяцы, количество дней в каждом из месяцев)...
ImagineDragons1111
20.05.2019 06:50
Составить программу которая запрашивает число и выдает таблицу умножения на это число.нужно решать в паскале.напишите )...
андрон14
26.01.2021 13:51
В каких сферах использкется гироскоопический датчик...
Poolll
26.01.2021 13:43
Лайков нету коментариев нету подпишика нету эх пойду погуглю...
Популярные вопросы
3. У виразах винесіть за душки спільний множник із найменшим показником степеня...
2
– Бровка поля Можно ли так говорить?...
2
Найдем сумму чисел 3 и 8 на координатном луче.Отметим на координатном луче точку...
1
23. Алдар Косе идет к юрте Шыгайбая со скоростью 80 м/мин (рис. 1.5). На координатном...
1
Нужно составить 10 предложений с этими словами...
1
Составить задачу на пересечение двух графиков. И решить ее...
3
Где будет is а где будет a, как я написала...
2
Фонетикалық талдау жасаңыз Бұлт,боран,қар,жел,ауа,...
3
все вопросы в скрине книга: english file pre-intermediate student s book...
1
54. Найдите наименьшее целое число, при котором верно неравен- ство: 1) (х + 1)(х...
3
N=10 //размер массива
Type
A=array[1..n]of real;
Var
I,B:integer;
Begin
For I=1 to n do
Read(a[i]); //ввели массив
Read(b);
For I=1 to n do
Begin
A[i]:=a[i]+b;
Write(a[i]);
End
End.