Witam,
Jak w Pascalu napisać taką pętlę (kod z C)
for(i=0; i<wys; i++)
{
for(s=0; s<i; s++)
printf("_");
for (g=(wys+wys)-1; g>i*2; g--)
printf("*");
printf("\n");
}
Z góry dzięki. Pozdrawiam
Witam,
Jak w Pascalu napisać taką pętlę (kod z C)
for(i=0; i<wys; i++)
{
for(s=0; s<i; s++)
printf("_");
for (g=(wys+wys)-1; g>i*2; g--)
printf("*");
printf("\n");
}
Z góry dzięki. Pozdrawiam
for i := 0 to wys - 1 do // wys - 1 to jest to samo co i < wys
begin
for s := 0 to i - 1 do
write('_');
for g := (wys + wys) - 1 downto i * 2 + 1 do
write('*');
writeln;
end;
-.-