Скласти програму, що виводить на екран монітора всі натуральні числа кратні 3 до з?
Скласти програму, що виводить на екран монітора всі натуральні числа кратні 3 до з??даного натурального n<=99, visual basic.Число n вводиться з клавіатури
плз срочно помогите
Гость
Ответ(ы) на вопрос:
Гость Program Project9;
{$APPTYPE CONSOLE}{$R *.res}
uses System.SysUtils;
procedure Go;var i, N: Byte;Begin i := 0; Write('Введите N: '); Readln(N); if N < 3 then Exit; repeat inc(i, 3); Write(i, ' '); until (i >= N);End;
begin try { TODO -oUser -cConsole Main : Insert code here } Go; except on E: Exception do Writeln(E.ClassName, ': ', E.Message); end; Readln;
end.
Не нашли ответ?
Похожие вопросы