[MacGyver]

Napisany przez luminat

Polecam stronke www.komputery-internet.net - bardzo duzo o programowaniu m. in. pascal. PS kallkulator to jedna z najprostszych rzeczy jaka mozna zrobic w pascalu...

...i napisanie zajmuje doslownie 5 minut...

..::Update::..
Wynik 2-minutowej pracy (nie mam Pascala wiec napisalem to w Delphi...ale w Pascalu chyba bedzie wygladać podobnie)
Programik robi podstawowe obliczenia (trzeba jeszcze dodac obsluge dzielenie przez zero)

program kalkulatorek;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var a,b,w: integer;
    d: char;
begin
    write ('Podaj pierwsza liczbe: ');
    readln (a);
    write ('Podaj druga liczbe: ');
    readln (b) ;
    write ('Podaj znak dzialania (+,-,*,/): ');
    readln (d);
    if d='+' then w:=a+b;
    if d='-' then w:=a-b;
    if d='*' then w:=a*b;
    if d='/' then w:=a mod b;
    writeln ('Wynik dzialania wynosi: ',w);
    readln;
end.