Klavyeden kenarlar sayıları girilen üçgenin çeşidini yazan program.

   uses crt;
   var
   a,b,c:integer;
   begin
   write(‘1. kenarı gir:’);readln(a);
   write(‘2. kenarı gir:’);readln(b);
   write(‘3. kenarı gir:’);readln(c);
   if(a=b) and (b<>c) then
   writeln(‘ikiz kenar’);
   else if(a=c) and (a<>b) then
   writeln(‘ikiz kenar’)
   else if(b=c) and (b<>a) then
   writeln(‘ilikz kenar’)
   else if(a=b) and (b=c) then
   writeln(‘eş kenar’)
   else writeln(‘Çeşit kenar’);
   readln;
   end.


 
Etiket:

Bu bilgi size yardimci oldu mu?

EvetHayır
Klavyeden kenarlar sayıları girilen üçgenin çeşidini yazan program.
Klavyeden kenarlar sayıları girilen üçgenin çeşidini yazan program.
(Ortalama: 5 üzerinden 2.5 - 2 Oy)
2

Bu içeriği nasıl geliştireceğinizi yazın...

Türkiyenin başkenti neresidir. Eksik harfi tamamlayın.:


Klavyeden kenarlar sayıları girilen üçgenin çeşidini yazan program.

Klavyeden kenarlar sayıları girilen üçgenin çeşidini yazan program. »Kod: [Seç]uses crt; var a,b,c:integer; begin writeln('1.kenari_giriniz:');readln(a); writeln('2.kenari_giriniz:');readln(b);