Puteti sa scrieti programul la Turbo Pascal 7 care sa arate urmatorul triunghi! Va rog frumos!
5
54
543
5432
54321
boiustef:
da, se poate...
Răspunsuri la întrebare
Răspuns de
0
Numai ca acest program il afiseaza invers:
var
a,b,c:integer;
begin
b:=54321;
c:=10000;
writeln(b);
for a:=1 to 4 do begin
writeln(b mod c);
c:=c div 10;
end;
end.
Daca te procepi in C++ codul arata astfel:
#include <stdio.h>
int main()
{
int i, j;
for(i=5;i>=1;i–)
{
for(j=5;j>=i;j–)
{
printf(“%d”,j);
}
printf(“\n”);
}
return 0;
}
a,b,i,n,c:integer;
begin
b:=0;
read(n);
for i:=1 to n do
b:=b+sqr(i);
c:=(b mod 10);
write(c);
end.
using namespace std;
short n, i, ult, ut, j;
int main()
{
cin >> n;
for (i=1; i <= n; ++i)
{
ut=1;
for (j=1; j <= i; ++j)
{
ut=(ut*(i%10))%10;
}
ult=(ult+ut)%10;
}
cout << ult;
}
ult e pentru ultima cifră a sumei
Răspuns de
0
programul de mai jos afiseaya respectivul triunghi pt orice numar dat, nu numai 5
program triunghi;
var i, j, n: integer;
begin
write('n='); read(n);
for i:=n downto 1 do
begin
for j:=n downto i do
write(j);
writeln;
end;
end.
Alte întrebări interesante