Turbo Pascal

[xZ_]

Люди помогите!Ибо в паскале я пок нубстер!=)
Надо создать две программы:
1.Найти Площадь Триугольника по формуле Гирона.
2.Найти площадь и длину окружности круга по радиусу.
Заранее СПС, тому кто поможет!)

1.
readln(a,b,c);
p=(a+b+c)/2;
s=sqrt(p*(p-a)*(p-b)*(p-c));
2.
readln(r);
s=Pi*sqr(r);
l=2*Pi*r;
p.s. )))))))

 

[Пух]

Люди помогите!Ибо в паскале я пок нубстер!=)
Надо создать две программы:
1.Найти Площадь Триугольника по формуле Гирона.
2.Найти площадь и длину окружности круга по радиусу.
Заранее СПС, тому кто поможет!)

9й класс, 9я школа... Смотри начало темы, эти задачи уже все решали(а келбас их не меняет)

 

[Cris]

9й класс, 9я школа... Смотри начало темы, эти задачи уже все решали(а келбас их не меняет)

надо уже в начале этой темы, делать оглавление))) название, или краткое описание задачи, и ссылку на код))

 

[zVonok]

народ для личного интереса как сделать так чтоби при вводе букви от A до Z
виводило нужний мне текст
P.S. На паскале

 

[Hamster]

char c;
c := readkey;

if((c >= "A") and (c <= "Z" ))
....
Что-то в этом роде.

 

[zVonok]

я понимаю тебе ос понятно а мне неочень так как я начал учить паскаль в начале учебного года и токо дошли до построения програм и мне надо шоб на каждую букву лат алфавита виводило текст если кто может помогите буду признателен

 

[Meiji]

uses crt;
var x:char;

begin
x:=readkey;
case x of
'A': write('A');
'B': write('B');
'C': write('C');
end;
end.

 

[Hamster]

так чтоби при вводе букви от A до Z
виводило нужний мне текст

надо шоб на каждую букву лат алфавита виводило текст

Что тебе должны ответить, если ты не можешь объяснить чего тебе надо?

Чтобы писать программы на ТП, нужно хотя бы научиться писать по-русски.

 

[zVonok]

char c;
c := readkey;

if((c >= "A") and (c <= "Z" ))
....
Что-то в этом роде.

не за старание спасибо но я новиок в програмирование но обещаю научитса

 

[Cris]

Cris вот я сдела куб мерцающий без заливки, припахай туда плиз еще чтоб заливка была и он не мерцал. буду очень благодарен. вот код:

ты конешно извини, но я етим страдать небуду), я шас С++ учу и к турниру по программированию готовлюсь