в массиве на фигне скольжу..народ!!! помощи прошу... - Форум
Среда, 07.12.2016, 11:36
Задачи по информатике
Главная | Регистрация | Вход Приветствую Вас Гость | RSS
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
Страница 1 из 11
Модератор форума: ignorer, KOT_B_MEIIIKE, PASCAL26, atvrider 
Форум » Решение задач по информатике » Задачи по программированию + блок-схемы » в массиве на фигне скольжу..народ!!! помощи прошу...
в массиве на фигне скольжу..народ!!! помощи прошу...
Каля-маляДата: Четверг, 04.06.2009, 10:59 | Сообщение # 1
Подполковник
Группа: Участник
Сообщений: 25
[ 2 ]
Статус: Offline
Люди, я лох!!! Задача почти решена:
Дан одномерный массив с некоторым количеством элементов массива:
Вывести новый массив, где все неотрицательные элементы ,не входящие в отрезок от 1 до 2 заменить на еденицы (ЭТО СДЕЛАНО)
подсчитать все отрицательные элементы (СДЕЛАНО!!!)
подсчитать все элементы в отрезке от 1 до 2 (И тут у меня какая-то фигня получается.
вот готовая часть задачи
k1 - кол-во элементов отрезка
k1:=0;
for i:=1 to n do
begin
if (m[i]>=1) and (m[i]<=2) then
k1:=k1+1;
end;
ну потом вывод на экран, так он их неверно считает, че-то болльше двух элементов не выходит, хотя задаю даже по 6
Люди помогите!!!!
 
notnotДата: Четверг, 04.06.2009, 12:29 | Сообщение # 2
Генерал-лейтенант
Группа: Активный пользователь
Сообщений: 54
[ 10 ]
Статус: Offline
мож с выводом касячишь? код-то правильный
ну на те мой. работает))
Code
program massivchik;

uses crt;

const
     n=10;

var A:array [1..n] of real;
     i,count:integer;

begin
ClrScr;
for i:=1 to n do
begin
    readln(a[i]);
end;
count:=0;
for i:=1 to n do
begin
    if (a[i]>=1) and (a[i]<=2) then
       inc(count);
end;
writeln('count = ',count);
ReadKey;
end.


я - девушка!! +_+
 
Каля-маляДата: Четверг, 04.06.2009, 22:01 | Сообщение # 3
Подполковник
Группа: Участник
Сообщений: 25
[ 2 ]
Статус: Offline
biggrin есть блин в жизни счастье, только вот свою ошибку так в толк и не взяла пока. Ланна, надо просто слегка отдохнуть. Спасибки,notnot, тебе огромные!!!!

Добавлено (04.06.2009, 22:01)
---------------------------------------------
wacko Нет!! Нормальн, да? Прграмка работает с самого начала как положено. это же мои мозги набекрень!!! Ищу 0.3,0.4 и т.д в диапазоне от 1 до 2 и считаю их сама вовсю матушку!!! И в придачу кляну, программу, что в ней ошибка. Вот посмотрите на горе луковое!!!! dry happy

 
notnotДата: Четверг, 04.06.2009, 22:32 | Сообщение # 4
Генерал-лейтенант
Группа: Активный пользователь
Сообщений: 54
[ 10 ]
Статус: Offline
бывает))) не переживай, лучше отдохни и снова в бой)

я - девушка!! +_+
 
Форум » Решение задач по информатике » Задачи по программированию + блок-схемы » в массиве на фигне скольжу..народ!!! помощи прошу...
Страница 1 из 11
Поиск:

Copyright MyCorp © 2016