Создайте приложение выводящее на экран первые 8 чисел кратных 7
Delphi
Создайте приложение выводящее на экран первые 8 чисел кратных 7
Delphi
Delphi
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program MultiplesOfSeven;
uses
System.SysUtils;
var
i, count: Integer;
begin
count := 0;
for i := 1 to 100 do
if count = 8 thenbegin
if i mod 7 = 0 then
begin
WriteLn(i);
Inc(count);
end;
Break;
end;
ReadLn;
end.