Не е нужно да се регистрирате!
Проект по информатика - блок - схема на Паскал
|
| Предишната тема :: Следващата тема |
| Автор |
Съобщение |
bixtape
Регистриран на: 24 Jun 2011 Мнения: 3
|
Пуснато на: Fri Jun 24, 2011 8:17 pm Заглавие: Проект по информатика - блок - схема на Паскал |
|
|
| Значи учителката ни даде да правим проект с различни задачи от материала на 9 клас.Та задачата е следната : " Да се състави блок - схема и програма на Паскал за намиране на периметър и лице на правоъгълен триъгълник по зададени страни а,b,c. Да се провери дали страните са положителни лица ". Ако някой има някакво предположение как се прави това и има знания в тази област да пише тук имам и примерен проект но нищо не разбирам |
|
| Върнете се в началото |
|
 |
Реклама
|
Пуснато на: Заглавие: |
|
|
|
|
|
| Върнете се в началото |
|
 |
mp3
Регистриран на: 18 Mar 2011 Мнения: 9
|
Пуснато на: Fri Jun 24, 2011 8:43 pm Заглавие: |
|
|
| Трябва ли да се проверява кои страни са катетите или се предполага, че това са а и b? Ако са въведени неположителни числа за страните - какво следва да се прави- съобщение ли да се изведе или да се въвеждат наново? |
|
| Върнете се в началото |
|
 |
dedomraz
Регистриран на: 15 Jun 2011 Мнения: 5
|
Пуснато на: Fri Jun 24, 2011 9:00 pm Заглавие: |
|
|
Предполагам идеята е, да се въведат параметрите и ако а,б,с са положителни да се сметне лицето. Изглежда така :
program abc;
var
a,b,c,S.P:real;
begin
writeln('a,b,c=');
redln(a);readln(b);readln(c);
If (a>0) and (b>0) and (c>0) then
S:=(a*b)/2;writeln('S=');
write(S:4:2);
P:=a+b+c;
writeln('P=');write(P:4:2)
If (a<0) or (b<0) or (c<0) then
writeln('nqma takav triagalnik');
end.
Последната промяна е направена от dedomraz на Fri Jun 24, 2011 9:02 pm; мнението е било променяно общо 1 път |
|
| Върнете се в началото |
|
 |
mp3
Регистриран на: 18 Mar 2011 Мнения: 9
|
Пуснато на: Fri Jun 24, 2011 9:02 pm Заглавие: |
|
|
Предполагам, че това ти трябва.
program ISKAM6;
var a,b,c: real;
p,s: real;
begin
write('Катет a=');readln(a);
write('Катет b=');readln(b);
write('Хипотенуза c=');readln(c);
if a>0 and b>0 and c>0 then
begin
p:=a+b+c;writeln('P=',p,'cm');
s:=(a*b)/2;writeln('S=',s:6:2,'kv.cm')
end
else writln('Въведени са неположителни дължини')
end.
Последната промяна е направена от mp3 на Fri Jun 24, 2011 9:11 pm; мнението е било променяно общо 1 път |
|
| Върнете се в началото |
|
 |
dedomraz
Регистриран на: 15 Jun 2011 Мнения: 5
|
Пуснато на: Fri Jun 24, 2011 9:03 pm Заглавие: |
|
|
| mp3- може да не са учили съставен оператор! В нашия клас бяха някви изостанали и само аз ползвах begin, end; |
|
| Върнете се в началото |
|
 |
mp3
Регистриран на: 18 Mar 2011 Мнения: 9
|
Пуснато на: Fri Jun 24, 2011 9:07 pm Заглавие: |
|
|
Всичко може!
Може и да не са учили формат при извеждане на реални числа, но и ти го изпалзваш.
Може и да не използвали сложно логическо условие, но тука трябва.
В задачата се иска периметър и лице - тогава как без съставен оператор?
Последната промяна е направена от mp3 на Fri Jun 24, 2011 9:16 pm; мнението е било променяно общо 1 път |
|
| Върнете се в началото |
|
 |
mp3
Регистриран на: 18 Mar 2011 Мнения: 9
|
Пуснато на: Fri Jun 24, 2011 9:14 pm Заглавие: |
|
|
| dedomraz написа: | Предполагам идеята е, да се въведат параметрите и ако а,б,с са положителни да се сметне лицето. Изглежда така :
program abc;
var
a,b,c,S.P:real;
begin
writeln('a,b,c=');
redln(a);readln(b);readln(c);
If (a>0) and (b>0) and (c>0) then
S:=(a*b)/2;writeln('S=');
write(S:4:2);
P:=a+b+c;
writeln('P=');write(P:4:2)
If (a<0) or (b<0) or (c<0) then
writeln('nqma takav triagalnik');
end. |
Няма да прави това, което трябва
Периметър ще се пресмята винаги - независимо дали страните са положителни или не.
А освен това "S=" и "Р=" ще се извежда на един ред, а неговата стойност - на следващия.... Същото е и с данните, които се въвеждат от клавиатурата. |
|
| Върнете се в началото |
|
 |
bixtape
Регистриран на: 24 Jun 2011 Мнения: 3
|
Пуснато на: Fri Jun 24, 2011 9:38 pm Заглавие: |
|
|
| Момчета много ви благодаря за бързата рекация,но така много много не можем да се разберем,ако е удобно да дадете скайп или аз да ви дам, или някаде да ви пратя проекта и да ви напиша по - подробно какво точно сме взели.Точно в/у този материал отсъствах и малко не го разбирам. Скайпа ми е aleti_94 ще следя активно и тук. Благодаря отново. |
|
| Върнете се в началото |
|
 |
mp3
Регистриран на: 18 Mar 2011 Мнения: 9
|
Пуснато на: Fri Jun 24, 2011 9:50 pm Заглавие: |
|
|
Момчета.........??!!??
Стига дискриминация!!
И момичетата разбират от програмиране!! |
|
| Върнете се в началото |
|
 |
bixtape
Регистриран на: 24 Jun 2011 Мнения: 3
|
Пуснато на: Fri Jun 24, 2011 10:12 pm Заглавие: |
|
|
| mp3 написа: | Момчета.........??!!??
Стига дискриминация!!
И момичетата разбират от програмиране!! | Е добре извинявам се нов съм във форума,разбери ме
П.П: БЛАГОДАРЕНИЕ НА МP3 проекта ще бъде осъществен! |
|
| Върнете се в началото |
|
 |
mp3
Регистриран на: 18 Mar 2011 Мнения: 9
|
Пуснато на: Fri Jun 24, 2011 11:03 pm Заглавие: |
|
|
Алилуя!!
 |
|
| Върнете се в началото |
|
 |
Гост
|
Пуснато на: Sun Nov 20, 2011 7:38 pm Заглавие: Здр |
|
|
на мен всичко ми беше розово , до като един ден не попаднах в часа по информатика и не ми дадоха ужаса на живота ми .
Стойностите на едномерния масив А(N) са реални числа и се задават от потребителя . Да се състави блок-схема и програма на Pascal за изчисляване на сумата:
A1;A1.A2(dvoikata tuk e malka kato pri himichen element v dolnata chast na A-to); A1.A2A3(i taz troika e malka);A1.A2....An
Ето това е което сасипа хубавите ми безгрийни дни в 1 ви курс на ФАКУЛТЕТО
Моля за попощ от някой добър и отзивчив човек ( без значение пола , специално за момичето по горе ) .  |
|
| Върнете се в началото |
|
 |
Реклама
|
Пуснато на: Заглавие: |
|
|
|
|
|
| Върнете се в началото |
|
 |
|
|
Можете да пускате нови теми Можете да отговаряте на темите Не Можете да променяте съобщенията си Не Можете да изтривате съобщенията си Не Можете да гласувате в анкети You cannot attach files in this forum Може да сваляте файлове от този форум
|
|