際際滷

際際滷Share a Scribd company logo
仗仂仍亰仂于舒仆亳亠 仍亳仆亠亶仆
舒仍亞仂亳仄仂于 亟仍 亠亠仆亳
亰舒亟舒
亊亰从 仗仂亞舒仄仄亳仂于舒仆亳: PASKAL

 乘    :
   丿 丱   弌 丐    1 1 -    .
舒亟舒舒
弌仂舒于亳 仗仂亞舒仄仄 亟仍 仆舒仂亢亟亠仆亳 仗仍仂舒亟亳
仗礆仂亞仂仍仆仂亞仂 亠亞仂仍仆亳从舒
亠亠仆亳亠
Program Ploshad;
var S,sinA,a:real;
begin
writeln ( vvedite dlinnu storoni  sinA );
readln(a,sinA);
S:=1/2*(a*a*sinA)
writeln(S=,S:2:2)
end.
仗仂仍仆亠仆亳亠
Alt+F9-从仂仄仗亳仍亳, 仗仂于亠从舒 仂亳弍仂从

Ctrl+F9-于仗仂仍仆亠仆亳亠 仗仂亞舒仄仄
于仂亟亳仄 仗亠亠仄亠仆仆亠
仂仍舒亠仄 仆舒 从舒仆亠 仂于亠
弍仆亠仆亳亠
Program Ploshad ; ( 从舒亰于舒亠仄 仆舒亰于舒仆亳亠 仗仂亞舒仄仄)
var S,sinA,a:real; ( 仂仗亳于舒亠仄 仗亠亠仄亠仆仆亠 于 仗仂亞舒仄仄亠)
begin ( 仆舒舒仍仂 舒弍仂亠亶 仂弍仍舒亳)
writeln ( vvedite dlinnu storoni  sinA );( 仂仗亠舒仂 于于仂亟舒
仗亠亟仗亠亢亟舒亠 仂 仆亢仆仂 于于亠亳 亰仆舒亠仆亳亠 仗亠亠仄亠仆仆)

readln(a,sinA); ( 亳于舒仆亳亠 亰仆舒亠仆亳 仗亠亠仄亠仆仆 于
仗舒仄 从仂仄仗ム亠舒)
S:=1/2*(a*a*sinA); (舒亳于舒亠仄 仗仍仂舒亟 亠亞仂仍仆亳从舒)
writeln (S=,S:2:2)( 于于仂亟亳仄 亠亰仍舒 仆舒 从舒仆)
end. ( 从仂仆亠 舒弍仂亠亶 仂弍仍舒亳)

More Related Content

Ispolzovanie lineynykh algoritmov_dlya_reshenia_z