macius122
Nowy
Dołączył: 17 Sty 2010
Posty: 1
Przeczytał: 0 tematów
Ostrzeżeń: 0/5
|
 Wysłany: Nie 18:44, 17 Sty 2010 Temat postu: Pomoc w dwóch zadaniach.... |
|
|
Witam. Jestem nowy na tym forum i na wstępie zaznaczę że szukałem tego o co mi chodzi u wujka googla ale nic konkretnego nie znalazlem.
Mianowicie, jestem kompletnie zielony w programowaniu w jezyku pascal, a muszę zrobić na zajęcia dwa programy. I tutaj moja prośba, czy moglby mi ktoś to napisac? Są to na moje oko bardzo proste programy.
1. Mam zaczęte i muszę to dokończyć. Program ma losowo wyznacazać 2000 liczb z jakiejś tablicy, a następnie ma sprawdzić czy w danym ciągu liczb jakieś się powtarzają i wyświetlić przynajmniej jedną parę liczb która się powtarza. Mam tyle:
| Cytat: | uses crt;
var
t:array[1...100] of integer;
i,j,k:integer;
x:boolean;
begin
clrscr;
writeln('Wprowadz liczbe elementow');
readln(k);
for i:=1 to k do
t[i]:=random (2000)+1;
x:=false
|
i dalej nie mam, a jest mi to pilnie potrzebne żeby zaliczyć ćwiczenia z podstaw programowania.
2. Na ćwiczenia praktyczne z tego samego przedmiotu muszę napisać program, który:
oliczy składkę ubezpieczenia samochodu na podstawie wprowadzonych danych (ceny oraz pojemności silnika). Program ma dziłać tak aby wyliczona składka ubezpieczenia wynosiła 1% od wartości samochodu + w zależności od pojemności silnika 1300cm3 dodatkowo 200zl, 1600cm3 dodatkowo 300zł, 2000cm3 dodatkowo 400zł, a jeśli cena samochodu jest wyższa niż 100000zł program ma naliczać zniżkę 5%. I tyle przynajmniej jest mi potrzebne żeby zaliczyć. Na wyższą ocenę program dodatkowo musi: wyliczyć kilka ubezpieczeń na raz do wprowadzonych danych oraz odszukać najwyższą wartość wyliczonego ubezpieczenia.
W związku z tym iż ja jestem z tego kompletnie zielony bardzo was proszę o pomoc w postaci napisania takich programików. Z góry bardzo dziękuję za pomoc. Pozdrawiam. Maciek
PS: jeśli ktoś potrzebuje kontaktu ze mną podaję email i gg:
[link widoczny dla zalogowanych]
1224645
Post został pochwalony 0 razy
Ostatnio zmieniony przez macius122 dnia Nie 18:44, 17 Sty 2010, w całości zmieniany 1 raz
|
|
