Görsel Programlama dersi için 2 soruda yardıma ihtiyacım var.

• Klavyeden girilen iki sayıyı karşılaştırıp, “iki sayı birbirine eşit”, “ilk girilen sayı, ikinci sayıdan büyük” veya ““ilk girilen sayı, ikinci sayıdan küçük” şeklinde mesaj veren programı yazınız?
• Klavyeden girilen iki sayı için dört işlemi yapan programın kodlarını yazınız.

Soruların çözümünü bilen varsa lütfen yardımcı olabilir mi?

Hangi dilde olacağını yazarsanız belki yardımcı olan bir arkadaş çıkar.

Visual basic ile bu şekilde yazılabilir.

Dim x, y As Integer

Sub Karsilastir()

x = InputBox("İlk Sayıyı Girin")

y = InputBox("İkinci Sayıyı Girin")

If x = y Then MsgBox ("İki sayı birbirine eşit.")

If x < y Then MsgBox ("İlk girilen sayı ikinci girilen sayıdan küçük.")

If x > y Then MsgBox ("İlk girilen sayı ikinci grilen sayıdan büyük.")

End Sub

'--------------------------------------

Dim x, y As Integer

Dim top, car, bol, cik As Long

Sub dortislem()

x = InputBox("İlk Sayıyı Girin")

y = InputBox("İkinci Sayıyı Girin")

top = x + y

car = x * y

bol = x / y

cik = x - y

MsgBox ("Toplama: " & top & ", Çarpma: " & car & ", Bölme: " & bol & ", Çıkarma: " & cik)

End Sub