Forum www.techinf1.fora.pl Strona Główna www.techinf1.fora.pl

 
 FAQFAQ   SzukajSzukaj   UżytkownicyUżytkownicy   GrupyGrupy   GalerieGalerie   RejestracjaRejestracja 
 ProfilProfil   Zaloguj się, by sprawdzić wiadomościZaloguj się, by sprawdzić wiadomości   ZalogujZaloguj 

kwadraty kolejnych liczb(tablicami)

 
Napisz nowy temat   Odpowiedz do tematu    Forum www.techinf1.fora.pl Strona Główna -> przykladowe zadania
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
tehran



Dołączył: 03 Lut 2008
Posty: 14
Przeczytał: 0 tematów

Ostrzeżeń: 0/5

PostWysłany: Śro 20:59, 06 Lut 2008    Temat postu: kwadraty kolejnych liczb(tablicami)

program kwadracik;
var
i:integer;
d:integer;
a:array [1..10] of integer;
begin
i:=1;
for i:=1 to 10 do
begin
writeln ( ' kwadrat ' ,i , 'wynosi' , i*i);
readln;
a[i]:=d;
end;
end.


Post został pochwalony 0 razy

Ostatnio zmieniony przez tehran dnia Pon 13:38, 11 Lut 2008, w całości zmieniany 1 raz
Powrót do góry
Zobacz profil autora
Wyświetl posty z ostatnich:   
Napisz nowy temat   Odpowiedz do tematu    Forum www.techinf1.fora.pl Strona Główna -> przykladowe zadania Wszystkie czasy w strefie EET (Europa)
Strona 1 z 1

 
Skocz do:  
Możesz pisać nowe tematy
Możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach

fora.pl - załóż własne forum dyskusyjne za darmo
Powered by phpBB © 2001, 2005 phpBB Group
Regulamin