PDA

Просмотр полной версии : 3 Примитивные задачи (Pascal).



Ghosting
21.03.2008, 16:05
Помогите пожалуйта! Не посылайте меня куда подальше, как это делали с других форумов :) Я паскаля напрочь не помню :) Нужно 3 задачи решить (простых).
Я конечно понимаю что это стыд и срам, но очень прошу вас - помогите пожалуйста!

Вот условия :
1) Сколько времени в минутах затратит школьник на дорогу из школы до станции, если известно расстояние S км и скорость движения V км/ч? (составить программу и блок-схему).
2) В секцию бокса принимаются мальчики, возраст которых не менее 10-ти лет. (Составить блок схему и программу мальчиков секции бокса.)
3) Цена 1 кг сыра К рублей. Составить блок-схему и программу определения стоимости 100 грамм, 200,300,400,500,600,700,800 грамм сыра.

Заранее огромное спасибо тому, кто откликнется и поможет!
Если что, код шлите на мыло : goctab@teletoria.ru
Спасибо!

drummer
21.03.2008, 16:25
1)


var s,v,t:real;
begin
write('s=');readln(s);
write('v=');readln(v);
t:=s/v*60;
writeln('t=',t:0:4);

end.

3)


var s,v,t:real;
begin
write('cost=');readln(s);
write('mass,g=');readln(v);
t:=s/1000*v;
writeln('price=',t:0:4);

end.

Medved
21.03.2008, 22:34
1)
Код:

var s,v,t:real;
begin
write('s=');readln(s);
write('v=');readln(v);
t:=s/v;
writeln('t=',t:0:4);

end.


Вот тут вы ошиблись! Сказано время в МИНУТАХ, а вы выводите в часах.

2) В секцию бокса принимаются мальчики, возраст которых не менее 10-ти лет. (Составить блок схему и программу мальчиков секции бокса.)

Объясните пожалуйста поточнее условие задачи

Хыиуду
23.03.2008, 19:20
2) В секцию бокса принимаются мальчики, возраст которых не менее 10-ти лет. (Составить блок схему и программу мальчиков секции бокса.)
3) Цена 1 кг сыра К рублей. Составить блок-схему и программу определения стоимости 100 грамм, 200,300,400,500,600,700,800 грамм сыра.

П.2. - невозможно составить программу, поскольку нет задания.
П.3. for i:=1 to 8 do writeln(K/10*i);

Vovchik
23.03.2008, 21:29
№1


program N1;
uses crt;
var s,v,t:real;
BEGIN
clrscr;
write('Введите растояние:');
readln(s);
write('Введите скорость:');
readln(v);
v:=v*1000/60;
t:=(s/v);
writeln('Время:',t:6:2);
readln;
END.

Vovchik
23.03.2008, 21:43
№3

program N3;
uses crt;
var sto,ves,sto1:real;
BEGIN
clrscr;
write('Введите стоимость за КГ:');
readln(sto);
write('Введите вес у гр:');
readln(ves);
sto1:=sto*ves/1000;
writeln('Стоимость',ves:10:2,':',sto1:10: 2);
readln;
END.

Vovchik
23.03.2008, 21:45
но што надо сделать во второй задаче что если ему больше 10 лет то не принемать ???

C_O_D_E
23.03.2008, 22:07
Возможно,Ghosting хотел сказать "составить программу принятия мальчиков в секцию". т.е. нужно проверять введенный возраст если больше или равно(т.е. Не менее) 10, то принять, иначе, соответственно, не принять.
Вопрос только в том. а что собственно вывести надо? В условии задачи ничего не сказано по этому поводу.

Хыиуду
24.03.2008, 11:28
Поражаюсь я с таких преподов, которые для 2+2 требуют блок-схему

C_O_D_E
25.03.2008, 21:28
Поражаюсь я с таких преподов, которые для 2+2 требуют блок-схему

А они {преподы} сами не могут (или только это и могут) нарисовать блок-схему для 2+2. И поэтому требуют от учащихся.

Vovchik
25.03.2008, 21:39
C_O_D_E, совершенно согласен !!