Гость
Статьи
Информатика

Информатика

Помогите решить 2 задачи)
1.Составить программу которая заполняет массив b[1..8] случайными числами в диапазоне от 1 до 10 и находит кол-во элементов с нечетным значением

2.Составить программу которая заполняет массив b[1..10] случайными числами в диапазоне от 2 до 10 и находит произведение с нечетным значением и кол-вл элементов с четными значениями

начало такое
Program prim_1;
Var b:array [1..8] of integer ;
i:integer ;
begin
For i:=1 to 8 do read ( b[i]);
..а дальше не получается :с

Гость
21 ответ
Последний — Перейти
June
#1

Млин, автор, Вы правда думаете мы сейчас полезем гуглить, как в турбопаскале написать элементарную программу?

Зачем Вам read, если массив заполняется СЛУЧАЙНЫМИ числами? Там ввода вообще никакого не должно быть!

Гость
#2

var ar:array [1..8] of Integer;

i,ch:integer;

begin

Randomize; //запуск

ch:=0;

for i:=1 to 8 do begin

ar[i]:=random(11);

if ar[i] mod 2=1 then inc(ch);

Label1.Caption:=Label1.caption+inttostr(ar[i])+' ';

end;

label2.Caption:=IntToStr(ch);

end;

решение первой задачи только на дефли(это как паскаль только не консольный)

для второй задачи тебе следует поменять

ar[i]:=random(11); на ar[i]:=2+random(9); и mod 2=1 на mod 2=0 ну и соотвественно размерность массива с 1..8 на 1..10 и цикл..

(мне не понятно-что значит находит произведение с нечетным значением..)

Гость
#3

блин, хотел код свой прокомментить..начал да забыл..спрашивай, если что)

Гость
#4
June

Сообщение было удалено

можно подумать данная программа-результат нереальных трудозатрат))

#5

Мде.. Автор- учиться пытались?:)) Или хотябы в пресловутый гугль залезть- задача простейшая.

Эхх, все вам, молодым, на блюдечке подай)))

Гость
#6
zloebuchka

Сообщение было удалено

Ну видимо для автора данный предмет не является интересным, поэтому проще списать. Когда нет интереса к предмету-тяжело себя заставить.

офтоп: интересно, это школьная программа?мы в школе дальше бейсика не ушли))

June
#7
Гость

Сообщение было удалено

Ну если Вы по жизни на Дельфях программируете - наверное, нет.

#8
Гость

Сообщение было удалено

Ваш текст

Сейчас для всех учеба стала неитересна. ПОтом ноют, что все в жизни не так и на работу их не берут. Гыыыы:))

Самая что ни на есть шкоольная:) Сейчас везде паскаль.

На бейсике раньше подобное разбиралось тоже.

В общем- те же яйца, только на другом языке.

#9
June

Сообщение было удалено

Ваш текст

Ну дааа:) Дельфя почти умерли как язык лет эдак пять минимум:)))

Гость
#10
zloebuchka

Сообщение было удалено

Это кто вам сказал?) Дефли так и остается хорошим языком для БД. Видел у нас несколько вакансий от москвы(озон,например)-именно дефли кодеры нужны были.

p.s. недавно был на тематической конференции..слушал доклад инновационого языка, который, как они сказали будет лучше всего что сейчас есть(на основе явы делают)..интересно))

#11

Меня всегда забавляло, что людей учат на паскале писать. Паскаль - полумертвый язык. На дельфях где-то пишут еще по старой памяти, но это уже вчерашний день и чисто по инерции продолжается. Их разве что на региональных заводах любят. Видимо, в силу того, что если писать на шарпе или яве, то будут приходить только вчерашние студенты, т.к. все остальные в Мск крупных городах за совсем другие деньги работают. И через год-другой и те будут уезжать в крупные города, работать за совсем другие деньги. А с дельфями есть небольшой шанс, что кто-то останется. Еще хороший вариант в этом же смысле - на фоксах писать :) В институтах их, кстати, тоже любят :) У меня, по крайней мере, фоксы были :)

#12

Я думаю, что в институтах, наверно, так же тема. От того и учат нафиг не нужному паскалю вместо плюсов, шарпа или явы и нафиг ненужным фоксами вместо pl-sql\t-sql. Вероятно, люди, которые реально хорошо разбираются в этом, работают в совсем других местах за совсем другие деньги.

June
#13
Гость

Сообщение было удалено

Делфи - язык для БД? Да Делфи как раз тем и известен, что с базами данных вообще практически не работает! Выбрасывайте уже это старьё и учите что-то более современное, как Димыч только что написал.

#14
June

Сообщение было удалено

Давным давно в далекой-далекой галактике, когда была еще 6ая и более ранние студии, на дельфях, помнится, было достаточно кошерно гуй делать. Там контролы, помнится, повеселее были. А то от стандартного мс грида глаза еще тогда кровью начинали плакать. И то лучше было для этого применять с++ билдер, т.к. опять же более расхожий язык унутре. Я тогда как раз программером работал и участвовал в паре больших проектов. В одном из них гуй был на vb (а сервер приложений - на плюсах), а во втором на билдере. Сравнение по гую было не в пользу vb. И контролы убогие и постоянный совершенно атомный секс со сборкой проекта, когда там кол-во форм за сотню перевалило.

#15

Но это было давным давно

#16
Гость

Сообщение было удалено

Ваш текст

Он не распространен так широко, как хотелось бы многим. Его используют, в соновном, в самом начале бучения программированию наряду с паскалем. Или паскаль у нас сейчас популярнее С++?:))

#17
Димыч

Сообщение было удалено

Ваш текст

Ооо, у меня в колледже сначала паскаль был, потом аж на делфи перешли:))))))))))

Тяги к чебе было ноль... Только время учебное забили, а фактических знаний- ноль:(

Лучше бы просто преподали парадигмы программирования.

#18
Димыч

Сообщение было удалено

Ваш текст

ПРавильно. Зачем им пахать в институте за аж за десять тыщщ, если они на крайняк могут пойти сисадминами за пятнадцать и работать в меньшими энергозатратами?:)))

#19
Димыч

Сообщение было удалено

Ваш текст

:))))))))))

#20
Димыч

Сообщение было удалено

Ваш текст

Это было недаавно, это было давно:)))

#21
Гость

Сообщение было удалено

Ваш текст

Учились в прошлом тысячелетии?:)) С прошлого года все школы на паскале.

Форум: Развлечения
Всего: 48 137 тем
Новые темы за все время: 38 169 тем
Популярные темы за все время: 17 431 тема