Wykonaj programy w turbo pascalu z użyciem TYLKO pętli repeat:
-narysuj na ekranie pionową kreskę długości 10 znaków na ekranie
-narysuj ramkę na ekranie
-wypisz wszystkie liczby podzielne przez 7 w zakresie 1-100
-oblicz n silnię
-oblicz potęgę x do n
" Life is not a problem to be solved but a reality to be experienced! "
© Copyright 2013 - 2024 KUDO.TIPS - All rights reserved.
to bedzie tak
-wpisz wszyskie liczby podzielone pzez 7 w zakresie 1-100
uses crt;
var
i:integer
begin
clrscr;
i:=7
repeat
write(i);
i:=i+7;
until i=98;
readkey;
end.
-narysuj ramke na ekaranie (zakładam ze moze byc dowolnych romiarów)
uses crt;
var
begin
Clrcsr;
writeln('tu robisz z kodu ASCI podwójną linie z tego co pamiętam jest to Alt+205 <na kwiatturze numerycznej> w załoczniku masz jaki numer odpowida jakiemu znaku no i robiusz ramkęXD');
readkey;
end.
TO TYLE MAM NADZIEJE ZE POMOGŁAM