Program kalkulator;
uses crt;
var a,b,wynik:real;
znak:char;
begin
clrscr;
Write('Podaj pierwsza liczbe: '); {Podajemy pierwsza liczbe}
Readln(a);
Write('Podaj druga liczbe: '); {Podajemy druga liczbe}
Readln(b);
Write('Podaj znak dzialania (+, -, *, /): '); {Podajemy znak dzialania}
Readln(znak);
CASE znak OF {Instrukcja wyboru znaku dzialania}
'+':wynik:=a+b;
'-':wynik:=a-b;
'*':wynik:=a*b;
'/':wynik:=a/b
ELSE
Write('Nie ma takiego dzialania!'); {Ten komunikat wyswietla sie jesli podamy znak inny niz 1 z tych 4}
end;
if wynik=a then
Write('Wynik dzialania wynosi: ',wynik:2:2);
readkey;
end.
Przeczytaj podobne teksty
Treść zweryfikowana i sprawdzona
Zgodnie z misją, Redakcja serwisu dokłada wszelkich starań, aby dostarczać rzetelne i sprawdzone treści edukacyjne.
Dodatkowe oznaczenie "Sprawdzona treść" wskazuje, że dany materiał został zweryfikowany przez Redakcję lub ekspertów współpracujących z serwisem.
Weryfikacja tekstu odbywa się na następujących poziomach:
1. Sprawdzenie tekstu pod kątem ewentualnych błędów ortograficznych, stylistycznych, interpunkcyjnych lub innych.
2. Weryfikacja tekstu pod kątem błędów rzeczowych.
3. Sprawdzenie materiału pod kątem ich aktualności.
Dodatkowe oznaczenie "Sprawdzona treść" wskazuje, że dany materiał został zweryfikowany przez Redakcję lub ekspertów współpracujących z serwisem.
Weryfikacja tekstu odbywa się na następujących poziomach:
1. Sprawdzenie tekstu pod kątem ewentualnych błędów ortograficznych, stylistycznych, interpunkcyjnych lub innych.
2. Weryfikacja tekstu pod kątem błędów rzeczowych.
3. Sprawdzenie materiału pod kątem ich aktualności.