Как написать такую прогграму в Паскале: найти количество элементов вектора из 10 команд -3 < A < 5
Дополнен
Найти количество элементов вектора из 10 команд -3<a,<5 (буква в букву)
По дате
По рейтингу
n = 10;
var a:array[1..n] of integer;
k,i: integer;
Begin
k:=0;
For i:=1 to n do
if (a[i]<5) and (a[i]>-3) then inc(k);
writeln(k);
end.
Для такого условия "букву в букву" программу составить невозможно.
А вот для такого условия
В векторе, состоящем из 10 элементов, найти количество элементов, удовлетворяющих условию -3<ai<5
Алекс Куха меня опередил)
Тебе осталось только добавить ввод массива
Это задача со звездочкой типа такой:
Что то у вас с условием задачи нелады. Можете переписать буква в букву?
А с какой целью она вам нужна???
Если реально нужна - и вы знаете - зачем, то вы её хоть на чём сделаете...
Видео по теме