proszę o rozwiązanie tego zadania: Napisz program w turbo pascalu z wykorzystaniem funkcji, odczytujący informacje z klawiatury, następnie obliczający według wzoru y=[2*x x>5 2/x x<5 oraz wyświetlający wynik. pilne!! 30 pkt za wykonanie
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
program nazawa;
uses crt;
var
x: integer;
begin
clrscr;
writeln('Podaj x: ');
readln(x);
writeln();
if (x>5) then
begin
writeln('y=2*x');
writeln('y=2*',x);
writeln('y=',2*x);
end;
if (x<5) then
begin
writeln('y=2/x');
writeln('y=2/',x);
writeln('y=',2/x:2:2);
end;
readln;
end.