From bb0bda28ae7c8fb5919127b31c501a40987022ce Mon Sep 17 00:00:00 2001 From: materus Date: Mon, 18 Nov 2024 15:36:34 +0100 Subject: [PATCH] =?UTF-8?q?Silnia,=20czas=20wykonywania=20-=20Pascal=20:?= =?UTF-8?q?=20Usuni=C4=99cie=20polskich=20znak=C3=B3w,=20zmiana=20nazwy?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- .../Pascal/AiSD5_C3/zad2_silnia_czas.pas | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Algorytmy i struktury danych/Pascal/AiSD5_C3/zad2_silnia_czas.pas b/Algorytmy i struktury danych/Pascal/AiSD5_C3/zad2_silnia_czas.pas index 9b970e1..adcff2a 100644 --- a/Algorytmy i struktury danych/Pascal/AiSD5_C3/zad2_silnia_czas.pas +++ b/Algorytmy i struktury danych/Pascal/AiSD5_C3/zad2_silnia_czas.pas @@ -1,10 +1,10 @@ -program silnia; +program silnia_czas; uses sysUtils; function Czytaj_liczbe: Int64; var liczba : Int64; begin - Write('Podaj liczbę calkowita: '); + Write('Podaj liczbe calkowita: '); ReadLn(liczba); Czytaj_liczbe := liczba; end; @@ -46,7 +46,7 @@ var wynikI, wynikR : Int64; begin liczba := Czytaj_liczbe(); - Write('Podaj liczbę iteracji: '); + Write('Podaj liczbe iteracji: '); ReadLn(ile); CzasI := Time(); for i := 0 to ile do