Napisz algorytm, który odejmie 2 zmienne ( x, y ) należące do liczb całkowitych .
Język: Free Pascal
program odejmowanie;
uses crt;
var x,y,z:integer;
begin
Writeln ('Podaj pierwszą liczbę');
readln(x);
Writeln ('Podaj drugą liczbę');
readln(y);
z:=x-y;
writeln ('wynik odejmowania to ',z:8:2,'');
end.
Algorytm znajduje się w załączniku:
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2025 KUDO.TIPS - All rights reserved.
Język: Free Pascal
program odejmowanie;
uses crt;
var x,y,z:integer;
begin
Writeln ('Podaj pierwszą liczbę');
readln(x);
Writeln ('Podaj drugą liczbę');
readln(y);
z:=x-y;
writeln ('wynik odejmowania to ',z:8:2,'');
end.
Algorytm znajduje się w załączniku: