|
Информатика, решение задач.
| |
| taniuha | Дата: Вторник, 2010-10-19, 8:47 PM | Сообщение # 1 |
Студент
Группа: Пользователи
Сообщений: 50
Репутация: 3
Замечания: 0%
Статус: Offline
Город: Самара
| помогите с информатикой... составить программы..
1)сколько можно купить быков,коров и телят, если бык стоит 10 рублей, корова 5 рублей, теленок 5 копеек. если на 100 рублей надо купить 100 голов скота. 2)вычислите номер дня, не в высокосном году по заданному числу и месяцу(число и месяц любые) 3)одноклеточная амеба за 3 часа делится на 3 клетки. определите сколько будет амеб через 3,6,9,12,15,18,21,24 часа..
|
| |
| |
| enjoyjkeeeee | Дата: Вторник, 2010-10-19, 9:25 PM | Сообщение # 2 |
Бакалавр
Группа: Проверенные
Сообщений: 183
Репутация: 90
Замечания: 0%
Статус: Offline
Город: Москва
| 3).На паскале делал
program ameba;
var c,k:integer;
begin
writeln('Введите количество часов, размножения амеб');
readln( c );
if c mod 3=0 then k:=c;
writeln('Количество амеб равно ',k);
readln;
end. P.s. Если не прав исправляйте,чисто попробовать написал) Добавлено (2010-10-19, 9:25 PM)
---------------------------------------------
2). Что значит номер дня?!
понедельник - 1,вторник - 2,среда - 3 , и т.д.?
Сообщение отредактировал enjoyjkeeeee - Вторник, 2010-10-19, 9:23 PM |
| |
| |
| tolyapro | Дата: Вторник, 2010-10-19, 9:30 PM | Сообщение # 3 |
|
Студент
Группа: Проверенные
Сообщений: 95
Репутация: 179
Замечания: 0%
Статус: Offline
| 2) если нужно узнать порядковый номер в году, то
var
m:= array[1..12] of int;
a,i,den,mes: integer;
begin
//заполняем масиив m кол-вом дней в каждом месяце, например, m[1]:=31;
read(mes); // месяц
read(den); // день
for i:=1 to mes-1 do
a:=a+mes[i]; // сумма
a:=a+den;
writeln(a);
end. 3)
writeln('введите кол-во часов');
read(n); //часы
n:=n div 3; // количество часов-троек
a:=pow(3,n);
writeln('амеб ',a);
Сообщение отредактировал tolyapro - Вторник, 2010-10-19, 9:45 PM |
| |
| |
| taniuha | Дата: Вторник, 2010-10-19, 9:56 PM | Сообщение # 4 |
|
Студент
Группа: Пользователи
Сообщений: 50
Репутация: 3
Замечания: 0%
Статус: Offline
Город: Самара
| спасибо вам огромное))) и еще одну задачку если можно)) составить программу для определенного кандидата, подходящего возраста, для вступления в брак, используя следующие соображения: возраст девушки равен половине возраста мужчины плюс 7, возраст мужчины равен возрасту девушки плюс возраст девушки минус 14.
|
| |
| |
| tolyapro | Дата: Вторник, 2010-10-19, 10:03 PM | Сообщение # 5 |
|
Студент
Группа: Проверенные
Сообщений: 95
Репутация: 179
Замечания: 0%
Статус: Offline
| Quote составить программу для определенного кандидата, подходящего возраста, для вступления в брак, используя следующие соображения: возраст девушки равен половине возраста мужчины плюс 7, возраст мужчины равен возрасту девушки плюс возраст девушки минус 14.
Что эта программа делать-то должна? Что вводить, что выводить? Quote возраст девушки равен половине возраста мужчины плюс 7, возраст мужчины равен возрасту девушки плюс возраст девушки минус 14
Это же одно и тоже условие 
Сообщение отредактировал tolyapro - Вторник, 2010-10-19, 10:06 PM |
| |
| |
| taniuha | Дата: Вторник, 2010-10-19, 10:09 PM | Сообщение # 6 |
|
Студент
Группа: Пользователи
Сообщений: 50
Репутация: 3
Замечания: 0%
Статус: Offline
Город: Самара
| ну оно так поясняется.....
надо найти подходящий возраст мужчины и женщины, для вступления в брак
|
| |
| |
| enjoyjkeeeee | Дата: Вторник, 2010-10-19, 10:14 PM | Сообщение # 7 |
|
Бакалавр
Группа: Проверенные
Сообщений: 183
Репутация: 90
Замечания: 0%
Статус: Offline
Город: Москва
| с коровками легкая,введите 3 переменных ,
получится уравнение 10x(быков)+5y(коров)+0,05z(телят)=100
Сообщение отредактировал enjoyjkeeeee - Вторник, 2010-10-19, 10:14 PM |
| |
| |
| tolyapro | Дата: Вторник, 2010-10-19, 10:14 PM | Сообщение # 8 |
|
Студент
Группа: Проверенные
Сообщений: 95
Репутация: 179
Замечания: 0%
Статус: Offline
| Code for m:=1 to 100 // возраст мужчины
for d:=1 to 100 // возраст женцины
if (d=m/2+7) // если выполняется условие, то
writeln(d,' ',m); // выводим возраст
если я правильно понял.. коровы вот так
Code
for b:=1 to 10
for k:=1 to 20
for t:=1 to 100
if (10*b+5*k+0,05*t=100) and (b+k+t=100)
writeln(k,' ',b,' ',n);
Сообщение отредактировал tolyapro - Вторник, 2010-10-19, 10:20 PM |
| |
| |
| taniuha | Дата: Вторник, 2010-10-19, 11:10 PM | Сообщение # 9 |
|
Студент
Группа: Пользователи
Сообщений: 50
Репутация: 3
Замечания: 0%
Статус: Offline
Город: Самара
| всем спасибо)))
|
| |
| |
| enjoyjkeeeee | Дата: Вторник, 2010-10-19, 11:23 PM | Сообщение # 10 |
|
Бакалавр
Группа: Проверенные
Сообщений: 183
Репутация: 90
Замечания: 0%
Статус: Offline
Город: Москва
| Quote (tolyapro)
for b:=1 to 10
for k:=1 to 20
for t:=1 to 100
if (10*b+5*k+0,05*t=100) and (b+k+t=100)
writeln(k,' ',b,' ',n);
по моему for t:=1 to 2000 do
т.к. на 100 рублей можно купить 2000 голов телят!!!
|
| |
| |
| taniuha | Дата: Вторник, 2010-10-19, 11:27 PM | Сообщение # 11 |
|
Студент
Группа: Пользователи
Сообщений: 50
Репутация: 3
Замечания: 0%
Статус: Offline
Город: Самара
| а что такое pow
3)
writeln('введите кол-во часов');
read(n); //часы
n:=n div 3; // количество часов-троек
a:=pow(3,n);
writeln('амеб ',a);
|
| |
| |
| Енот-потаскун__ | Дата: Вторник, 2010-10-19, 11:30 PM | Сообщение # 12 |
Почетный академик
Группа: Проверенные
Сообщений: 2739
Репутация: 2398
Замечания: 0%
Статус: Offline
| Паскаль)))
|
| |
| |
| enjoyjkeeeee | Дата: Вторник, 2010-10-19, 11:38 PM | Сообщение # 13 |
|
Бакалавр
Группа: Проверенные
Сообщений: 183
Репутация: 90
Замечания: 0%
Статус: Offline
Город: Москва
| Quote (taniuha) а что такое pow
3)
writeln('введите кол-во часов');
read(n); //часы
n:=n div 3; // количество часов-троек
a:=pow(3,n);
writeln('амеб ',a);
Если я не ошибаюсь то это возведение в степень.
Сообщение отредактировал enjoyjkeeeee - Вторник, 2010-10-19, 11:39 PM |
| |
| |
| Енот-потаскун__ | Дата: Вторник, 2010-10-19, 11:40 PM | Сообщение # 14 |
|
Почетный академик
Группа: Проверенные
Сообщений: 2739
Репутация: 2398
Замечания: 0%
Статус: Offline
| Quote (enjoyjkeeeee) Если я не ошибаюсь то это возведению в степень по моему.
нее....не ошибаешься, и в С++ также
|
| |
| |
| prm2008 | Дата: Вторник, 2010-10-19, 11:40 PM | Сообщение # 15 |
Профессор
Группа: Проверенные
Сообщений: 815
Репутация: 1199
Замечания: 0%
Статус: Offline
| Quote (taniuha) а что такое pow
taniuha, по смыслу здесь должно быть возведение в степень. Но в Паскале нет такой функции, это можно сделать, но через логарифм, а тут видимо нужно описать процедуру возведения числа в степень. Чтобы без нее обойтись нужно просто в цикле, пока не достигнешь указанного значения домножать на 3.
...чтобы оставаться на одном месте нужно все время двигаться вперед...
|
| |
| |
|
|
|
RSS: