Napisz program który sprawdza wzrost użytkownika poniżej 160cm(mały),powyżej 180cm(duży) a miedzy 160-180(średni) w programie free pascall
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2025 KUDO.TIPS - All rights reserved.
program nazawa;
uses crt;
var
wzrost:integer;
begin
clrscr;
writeln('Podaj wzrost');
readln(wzrost);
if (wzrost<160) then
writeln('maly');
if (wzrost > 180) then
writeln('duzy');
if ((wzrost>=160) and (wzrost <=180)) then
writeln('sredni');
readln;
end.