Pascal задан массив x из 8 элементов. сформировать массив y по правилу:
Ulya391
2
01.11.2019 13:47
1
Другие вопросы по теме Информатика
Iist
30.08.2019 13:40
51179
22.12.2020 22:21
захар182
22.12.2020 22:21
varsockaya
22.12.2020 22:22
KrIsTaLLiK16
11.11.2019 23:15
kravts222p08eoo
11.11.2019 21:37
диана2294
11.11.2019 21:41
Популярные вопросы
- Государства в древнем двуречье возникли: более 6 тыс лет назад более 5 тыс лет...
1 - Какую роль в стихотворении играет образ сна? к чаадаеву....
1 - Вячейке а1 находится число 1, в ячейке в1 – число 2, а в ячейке d1 находится...
2 - Сколько яеечк электронной таблицеив диапазоне а2: в4?...
1 - Все представители этой группы простейших паразиты...
2 - Представьте в виде бесконечной периодической десятичной дроби 1/3...
1 - Среди предложений 26–48 найдите три предложения с рифмами. напишите их номера...
1 - Чему равна площадь треугольника , периметр которого равен 12 см а радиус вписанного...
3 - Уженщины 2 группа крови у мужчины 2 группа какая группа крови у ребёнка?...
3 - Человек бежит со скоростью 5 м/с относительно палубы теплохода направлении противоположном...
2
const
k = 8;
var
i: integer;
x, y: array[1..k] of real;
begin
for i := 1 to k do
Read(x[i]);
for i := 1 to k do
begin
if i mod 2 = 0 then
y[i] := 4 * x[i]
else
y[i] := cos(2 * x[i]);
write(y[i], ' ')
end;
end.