сервис вопросов и ответовДан массив состоящий их 7 вещественных чисел. Из всех положительных элементов массива вычесть элемент с номером k, из всех отрицательных n (
5-9 класс|
|
числа k и n вводятся с клавиатуры). Нулевые элементы оставить без изменения.
Olyagoncharovaa
16 сент. 2013 г., 4:11:36 (10 лет назад)
зюкина
16 сент. 2013 г., 5:37:04 (10 лет назад)
var a: array[1..7] of real;
k, n: integer;
begin
readln(k, n);
for i:=1 to 7 do begin
read(a[i]);
if a[i]<>0 then if a[i]>0 then a[i]:=a[i]-a[k] else a[i]:=a[i]-a[n];
write(a[i], ' ');
end.
Ответить
Другие вопросы из категории
Используя знаки арифмитичкских действий + - * : и если надо скобки запишите числа от 1 до 10 с помощю четырёх троек 3 3 3 3=1 3 3 3 3=2
>
3 3 3 3=3
3 3 3 3=4
3 3 3 3=5
3 3 3 3=6
3 3 3 3=7
3 3 3 3=8
3 3 3 3=9
3 3 3 3=10
37 школьников из ученической производственной бригады изъявили желание летом работать на уборке зерновых. Каждый из них имеет права для работы на
тракторе или на комбайне, а некоторые могут работать и на тракторе, и на комбайне. Сколько школьников могут работать и на тракторе, и на комбайне, если известно, что трактором хорошо овладели 23 человека, а комбайном - 31 человек?
Читайте также
Решить задачи на языке программирования в Turbo Pascal: 1) Дан массив, состоящий из 10 чисел, значения могут быть
от -100 до 100. Определить минимальное положительное число.
2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.
составьте программу, которая формирует массив, содержащий 10 случайных целых чисел, принадлежавших промежутку [0;7], и преобразует элементы массива по
следующему правилу: к чётному числу прибавляет 3,а к нечётное умножает на 4
Сформировать массив содержащий 15 случайных целых чисел, принадлежащих промежутку [0;8] и преобразовать элементы массива по следующему правилу: к четному
прибавить 1, а нечетное умножить на 2.
составить программу которая формирует массив содержащий 8 случайных целых чисел принадлежащих промежутку [0..5 ] и преобразует элементы массива по
следующему правилу: четное число умножает на 5 ,а от нечетного отнимает 2.
1.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами до 50. Найти сумму всех четных элементов массива и их количество.
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
Вы находитесь на странице вопроса "Дан массив состоящий их 7 вещественных чисел. Из всех положительных элементов массива вычесть элемент с номером k, из всех отрицательных n (", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.