profile
Опубликовано 4 года назад по предмету Информатика от karim0va

напечатать на экране компьютера все числа в диапазоне от 1 до 100, делящиеся на 13

  1. Ответ
    Ответ дан Аккаунт удален
    var i:integer;
    begin
    for i:=1 to 100 do
    begin
    if i mod 13 = 0 then writeln (i);
    end;
    end.