• Паскаль абс

    2 задачи

    1)Написать программу выводящую на экран последовательность чисел от 1 до 10 через пробел в строчку.

    2)Написать программу которая бы выводила на экран произведение нечетных чисел от 10 до 20.

Ответы 1

  • Пожалуйста:

     

    1) 

    program posledovat1;var  w:integer;

     

    begin

     

    w:=0;repeat

      w:=w+1;  write(w,' ');until w=10

     

    end.

     

    2)

    program nechet1;var  i,pr:integer;

     

    begin

     

    pr:=1;for i:=11 to 20 do  if i mod 2 = 1 then    pr:=pr*i;    writeln(pr);

    end.

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years