Skocz do zawartości

tp pomoc w wyświetlaniu liczb


Masakra

Polecane posty

Witam

Mam problem bo muszę zrobić program w turbo pascalu a jak na razie miałem z tego 2 lekcje i za bardzo jeszcze tego nie rozumie ;/

 

A program musi być taki:

Wprowadzić z klawiatury 2 dowolne liczby całkowite typu integer,na ekranie komputera wyświetlić sumę tych liczb,różnicę,iloczyn,iloraz,iloraz całkowity,resztę z dzielenia.

 

 

A dodatkowo:

wynik z dzielenia wyświetlić z dokładnością do 3 miejsc po przecinku

po lewej stronie suma znakow w naglowku a po prawej suma wynikow

 

no i oczywiście to wszystko wyśrodkować

 

Z góry dziękuje :-)

Link do komentarza
Udostępnij na innych stronach

definicja zmiennej:

var

a: integer;

 

suma: +

roznica: -

dzielenie: / lub div

iloczyn: *

reszta: mod

wyswietlanie z dokladnoscia uzyskujesz przez znak ':' przyklad: a:0:2

 

definicja procedury

 

procedure nazwaFunkcji(lista argumentow);

var

... zmienne tutaj

begin

... cialo metody tutaj

end;

Always Dark<br />u1_tt_logo.png banner-1.pngexFabula-banner.pngson_banner_ubersmall.jpg

Link do komentarza
Udostępnij na innych stronach

napisalem to ale mam jakis blad ;/...

 

program spr1-10;

{Artur Glabica 1i 10}

uses crt;

var x, y, s, r, i, reszta, ilorcal:integer;

il:real;

begin

clrscr;

writeln ('Podaj liczbe x');

readln (x);

writeln ('Podaj liczbe y');

readln (y);

clrscr;

s:=x+y;

r:=x-y;

i:=x*y;

ilorcal:=x div y;

reszta:=x mod y;

gotoxy (17,5);

write ('liczba x= ');

writeln (x);

gotoxy (17, 6);

write (liczba b= ');

writeln (y);

gotoxy (36, 9);

writeln ('wyniki');

writeln ('');

write ('suma= ');

writeln (s);

writeln ('');

write ('roznica= ');

writeln ®;

writeln ('');

write ('iloczyn= ');

writeln (i);

writeln ('');

write (iloraz= ');

writeln (il:0:3);

writeln ('');

write ('iloraz calkowity= ;);

writeln ('');

write ('reszta z dzielenia= ');

writeln (reszta);

readln;

end.

 

 

 

a błąd mi znajduje w linijce 16 ( ilorcal:=x div y;)

 

pomoże ktoś?

Link do komentarza
Udostępnij na innych stronach

Zarchiwizowany

Ten temat jest archiwizowany i nie można dodawać nowych odpowiedzi.

×
×
  • Utwórz nowe...