Задача на массив Опции

[Kreaman]

Здравствуйте, уважаемые форумчане....У меня вот проблемка, я уже раза завалил экзамен по программированию, никак не получается у меня с массивами и строками...

Кто может пожалуйста напишете решение....заранее очень благодарен)...

1. Массив Х задан как типизированая контстанта. Х(1.4;10;2;5;6.7;23.7;22;7.5). Вычислить и вывести на экран количество элементов, которые не больше за число 10.


Сообщение отредактировано: Kreaman - 30.01.2008 17:10

[Michael_Rybak]

!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ... 6. Одна тема - один вопрос (задача) В этой теме оставляй одну, для второй открывай новую.

[мисс_граффити]

а от того, что мы напишем, у тебя станет "получаться с массивами и строками"?

[Kreaman]

а от того, что мы напишем, у тебя станет "получаться с массивами и строками"?

Я хоть пойму как оно всё делаеться, просто модульная работа состоит из одинаковіх заданий, и если ві мне поможете сделать их, то я смогу разобраться в них!

[Client]

Простенькая задача на массив, смотри FAQ и спрашивай что именно не понятно

[Kreaman]

Вам простенькая, а мне ничего не понятно, так как материала эатакого я не где не видел, а с похожими задачами у мня голова не сможет слепить одну...не можете помочь, так и скажите, не надо мня куда то там на страницы посылать, почитай мол то, почитай это, я попросил сделайте кто может...

[compiler]

посмотри следующую задачу, которая суммирует элементы не равные трём...

const
  my_ar: array [1..4] of integer=(      
      1,2,3,4
    ) ;
var
        i, s: integer;
begin
        s:=0;
        //low() - возвращает порядковый номер первого элемента(1)
        //high() - последнего элемента(4)
        for i := low(my_ar) to high(my_ar) do
                if my_ar[i] <> 3 then s := s+my_ar[i];
        writeln(s);
end.

теперь учти
1) элементы массива у тебя real, а не integer
2) другое условие сравнения( у тебя больше десяти, вместо <>3)

теперь пробуй сам, не получится спрашивай...

Сообщение отредактировано: compiler - 30.01.2008 23:59

[Yevgeny]

не можете помочь, так и скажите, не надо мня куда то там на страницы посылать, почитай мол то, почитай это

Ты что правда сомневаешься, что тебе тут никто помочь не может? зря...

если ві мне поможете сделать их, то я смогу разобраться в них!

а вот это действительно сомнительно...
Ты бы сам что-нить сделал и в правду, и тогда тебе бы сразу помогли

[Станник]

Здравствуйте, уважаемые форумчане....У меня вот проблемка, я уже раза завалил экзамен по программированию, никак не получается у меня с массивами и строками...

Кто может пожалуйста напишете решение....заранее очень благодарен)...

1. Массив Х задан как типизированая контстанта. Х(1.4;10;2;5;6.7;23.7;22;7.5). Вычислить и вывести на экран количество элементов, которые не больше за число 10.

Вот набросал...Написано немного некрасиво, но вроде работало...

uses
crt;
const
x: array [1..12] of integer=(1,4,10,2,5,6,7,23,7,22,7,5);
var
i,j:integer;
begin
clrscr;
for i:=1 to 12 do    {Число элементов массива, параметр цикла}

  if x[i]<10 then
   begin
   j:=j+1;          {Счетчик  количества чисел <10}
   writeln(x[i]);
   end;
    writeln('Число элементов ',j);
    readln;
end.

[мисс_граффити]

Станник, j хорошо бы обнулить.
И "не больше" - это меньше или _равно_.

[compiler]

Станник, (1,4,10,2,5,6,7,23,7,22,7,5) и (1.4;10;2;5;6.7;23.7;22;7.5) отличаются, не так ли?

[Странник]

Станник, (1,4,10,2,5,6,7,23,7,22,7,5) и (1.4;10;2;5;6.7;23.7;22;7.5) отличаются, не так ли?

Писал быстро, мож че и забыл...тут главное алгоритм...