jatznona utworzono 24 października 2007 utworzono 24 października 2007 Witam wszystkich gorąco, mam wielki problem, potrzebuje pilnie napisac program w Pascalu, a nie mam zielonego pojecia jak to zrobic, dla zainteresowanych pomoca dla mnie:D moge powiedziec ze chodzi o potegowanie liczb z wykorzystaniem funkcji repeat until , z gory dziekuje za kazda forme pomocy i pozdrawiam goraco:)
jatznona komentarz 24 października 2007 Autor komentarz 24 października 2007 znam podstawy podstaw - tak bym to ujela
Bamu komentarz 24 października 2007 komentarz 24 października 2007 http://www.pascal.eu.org/index2.htm Ten poradnik może ci coś pomoże, każda funkcja jest opisana
luq komentarz 24 października 2007 komentarz 24 października 2007 Ja zaczynałem od tego http://turbopascal.skryptoteka.pl/1.html na początek jak najbardziej wystarczy.
onna komentarz 24 października 2007 komentarz 24 października 2007 Powiem tak, nikt za Ciebie nie napisze programu, możemy jedynie pomóc w rozwiązaniu jakiegoś problemu
Kurzun komentarz 24 października 2007 komentarz 24 października 2007 Zrób tak: Repeat Write('Podaj liczbe inna od zera - zero = wyjscie'); Read(liczba); Write('potega liczby: '); write(liczba ); writeln('wynosi:'); writeln(liczba*liczba); Until liczba=0 end. Oczywiście wprowadź uses crt; oraz zmienną liczba.
grucha komentarz 24 października 2007 komentarz 24 października 2007 A może chodziło Ci o potęgowanie liczb o wykładniku naturalnym dodatnim? :> Jeśli tak to proszę: program Project1;{$APPTYPE CONSOLE}uses SysUtils;var liczba, wykladnik, wynik:integer;begin wynik:=1; Writeln('Podaj podstawe potegi: '); Read(liczba); Writeln('Podaj wykladnik potegi (liczba calkowita >0): '); Readln(wykladnik); repeat wynik:=wynik*liczba; Dec(wykladnik); until wykladnik=0; Readln;end. Oczywiście program nie jest odporny na błędy użytkownika...
Wciąż szukasz rozwiązania problemu? Napisz teraz na forum!
Możesz zadać pytanie bez konieczności rejestracji - wystarczy, że wypełnisz formularz.