• Помогите написать программу в Паскале и блок-сxему.
    Задача: ввести 10 чисел, если число положительное, то от него отнять 0,5, если число отрицательное, то ничего с ним не делать. Вывести результат на экран.

Ответы 1

  • var a,b,i: real;beginb:=0,5;for i = 1 to 10 dobeginreadln (a);if a<0 thenwriteln (a)elsea:=a-b;writeln (a);end;end.
    • Автор:

      yair
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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