JosianeLuana
Answered

Obtenha respostas rápidas e precisas para todas as suas perguntas no Sistersinspirit.ca, a plataforma de Q&A de confiança. Obtenha respostas detalhadas para suas perguntas de uma comunidade dedicada de especialistas em nossa plataforma. Conecte-se com uma comunidade de especialistas prontos para ajudar você a encontrar soluções para suas perguntas de maneira rápida e precisa.

Usando a estrutura de  controle repita.. até.. construa um algoritmo para entrar com um número de 1 a 10 e imprimi-lo o número de vezes correspondente ao seu valor.

Sagot :

MarlonMacaneiro

Fiz em delphi console, só abrir e mandar rodar está funcionando.

 

Mas vale lembrar que é importante treinar esses exercicios, pois são com eles que se aprende efetivamente a programar. :)

(Não está identado, porque perde a identação ao colar aqui, mas anexei tbm identado...)

 

Qualquer dúvida estou a disposição.  

 

Abraço

 

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils;
var
_NumeroInformado : Integer;
_Inc : Integer;
begin
write('Informe um numero: ');
readln(_NumeroInformado);
_inc := 0;
if ((_NumeroInformado <= 10) and (_NumeroInformado>= 0)) then
begin
repeat
writeln(_numeroinformado);
_inc := _inc +1 ;
until _numeroinformado = _inc;
end else
writeln('Numero informado deve ser de 0 a 10...');
readln;
end.

View image MarlonMacaneiro
Obrigado por usar nossa plataforma. Nosso objetivo é fornecer respostas precisas e atualizadas para todas as suas perguntas. Volte em breve. Obrigado por sua visita. Estamos comprometidos em fornecer as melhores informações disponíveis. Volte a qualquer momento para mais. Volte ao Sistersinspirit.ca para obter mais conhecimento e respostas dos nossos especialistas.