Faça um algoritmo que exiba na tela todos os múltiplos de 7 entre os números de 1 a 100 em ordem decrescente, no programa Pascal.
Respostas
respondido por:
4
// Algorítmo para o programa Dev-Pascal
program multiplodesete;
var
a:integer;
begin
for a := 1 to 100 do
begin
if (a mod 7) = 0 then
Writeln(a);
end;
readln();
end.
// Espero ter ajudado.. :))
program multiplodesete;
var
a:integer;
begin
for a := 1 to 100 do
begin
if (a mod 7) = 0 then
Writeln(a);
end;
readln();
end.
// Espero ter ajudado.. :))
DennisRitchie:
Estas precisando de aulas de interpretação também. :)
Perguntas similares
7 anos atrás
7 anos atrás
7 anos atrás
9 anos atrás
9 anos atrás
9 anos atrás
9 anos atrás