PROGRAM Płace za nadgodziny;

ZMIENNE (P, n, s: naturalne dodatnie);

ZACZNIJ

Wprowadź (n, s);

JEŚLI n>30 (P:=n*3/2s)

W PRZECIWNYM WYPADKU (P:=n*s);

Wyprowadź (`płaca za nadgodziny wynosi'),P;

ZAKOŃCZ

START

n>30

TAK

NIE

Podaj liczbę nadgodzin n

Oblicz płacę P:=n*3/2s

Podaj stawkę za nadgodziny s

Oblicz płacę P:=n*s

STOP

Wyświetl płacę za przepracowane godziny

---