Людмила902
?>

Самые важные устройства компьютера и их функции: 1. общаться в skype можно при : а) системного блока б) принтера в) наушников г) указатель 2. чтобы создать видеоконференцию в skype, нужна: а) указатель б) клавиатура в) трекбол г) видеокамера

Информатика

Ответы

proh-dorohova5244

ответ:

1-в 2-г

объяснение:

Fetyukov

Так как на большинстве версий "Паскаля" мы не можем установить шаг цикла в for, будем использовать цикл while для решения данной задачи.

Возьмём переменную i для хранения нужных нам значений, дадим ей значение равное 1001, запустим цикл while, который будет выполняться пока наша i <= 1025, в цикле у нас будет выводиться на экран значение переменной i, а затем переменная увеличиваться на 3.

Алгоритм на языке Паскаль:

var

i : integer;

begin

i := 1001;

while i <= 1025 do

begin

write(i,' ');

i := i + 3;

end;

end.

Anzhelika-Bulanov802
//PascalABC.NET 3.1 сборка 1239
const
    n = 10;
    m = 10;

var
    i, j: integer;
    a, b: array[1..n, 1..m] of integer;
    f: boolean;

begin
    for i := 1 to n do
    begin
        for j := 1 to m do
        begin
            a[i, j] := random(50);
            write(a[i, j]:3, ' ');
        end;
        writeln;
    end;
    writeln;
    
    for i := 1 to n do
    begin
        f := false;
        for j := 1 to m do
        begin
            if not f and (a[i, j] mod 2 = 1) then begin
                a[i, j] := 2 * a[i, j];
                f := true;
            end;
            write(a[i, j]:3, ' ');
        end;
        writeln;
    end;
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Самые важные устройства компьютера и их функции: 1. общаться в skype можно при : а) системного блока б) принтера в) наушников г) указатель 2. чтобы создать видеоконференцию в skype, нужна: а) указатель б) клавиатура в) трекбол г) видеокамера
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Тамара_Григорьевна897
shef3009
vladimirkirv
marinakmaa86
mayorovmisc6
stairov536
Designer
barekyan096140
Татьяна
printlublino
office
andreykrutenko
Sokolova-Shcherbakov
ГалинаРайгородская
Які сервіси належать до хмарних​
Galina-Marat1096