Uzdavinys

Kelias į mokyklą. Kiekvieną dieną Paulius, eidamas į mokyklą, skaičiuoja kiekvieną savo žingsnį ir žaidžia tokį žaidimą: kai žingsnių skaičius baigiasi nuliu, Paulius suploja rankomis, o kai penketu - spragteli pirštais. Parašykite programą, kuri suskaičiuotų, kiek kartų Paulius suplos rankomis ir kiek – spragtels pirštais, jei jam iki mokyklos yra lygiai n žingsnių. pasitikrinti, kai n=15, suplojimu bus 1,  spragtelejimu bus 2.

Gal kas gali padeti?

ChatGPT.

pascal 

program PauliausZaidimas;

var
  n, suplojimai, spragteliavimai, zingsnis: integer;

begin
  writeln('Įveskite žingsnių skaičių iki mokyklos:');
  readln(n);

  suplojimai := 0;
  spragteliavimai := 0;

  for zingsnis := 1 to n do
  begin
    if (zingsnis mod 10 = 0) then
      suplojimai := suplojimai + 1
    else if (zingsnis mod 5 = 0) then
      spragteliavimai := spragteliavimai + 1;
  end;

  writeln('Suplojimų skaičius: ', suplojimai);
  writeln('Spragteliavimų skaičius: ', spragteliavimai);
end.

python

def suskaiciuoti_suplojimus_ir_spragteljimus(n):
    suplojimai = 0
    spragteliavimai = 0

    for zingsnis in range(1, n + 1):
        if zingsnis % 10 == 0:
            suplojimai += 1
        elif zingsnis % 5 == 0:
            spragteliavimai += 1

    return suplojimai, spragteliavimai

n = 15
suplojimai, spragteliavimai = suskaiciuoti_suplojimus_ir_spragteljimus(n)

print(f"Suplojimų skaičius: {suplojimai}")
print(f"Spragteliavimų skaičius: {spragteliavimai}")

prieš 7 valandas, Apocal parašė:

pascal 

program PauliausZaidimas;

var
  n, suplojimai, spragteliavimai, zingsnis: integer;

begin
  writeln('Įveskite žingsnių skaičių iki mokyklos:');
  readln(n);

  suplojimai := 0;
  spragteliavimai := 0;

  for zingsnis := 1 to n do
  begin
    if (zingsnis mod 10 = 0) then
      suplojimai := suplojimai + 1
    else if (zingsnis mod 5 = 0) then
      spragteliavimai := spragteliavimai + 1;
  end;

  writeln('Suplojimų skaičius: ', suplojimai);
  writeln('Spragteliavimų skaičius: ', spragteliavimai);
end.

python

def suskaiciuoti_suplojimus_ir_spragteljimus(n):
    suplojimai = 0
    spragteliavimai = 0

    for zingsnis in range(1, n + 1):
        if zingsnis % 10 == 0:
            suplojimai += 1
        elif zingsnis % 5 == 0:
            spragteliavimai += 1

    return suplojimai, spragteliavimai

n = 15
suplojimai, spragteliavimai = suskaiciuoti_suplojimus_ir_spragteljimus(n)

print(f"Suplojimų skaičius: {suplojimai}")
print(f"Spragteliavimų skaičius: {spragteliavimai}")

kai 10, 20 ... spragtelti nereikia,  gal tada -->  zingsnis % 10 == 5, jeigu nenori ciklo suplojimai bus lygu.         n // 10,    spragtelejimai   (n + 5) // 10

Prašom, jokių ciklų naudoti nereikia: https://dotnetfiddle.net/xJrTm8