1.напечатать таблицу умножения для числа 27 в qbasic, с операторов for, print, next.2.напечать таблицу перевода долларов в рубли от 10 до 100 шагом 10.также бейсик!
Pascalabc.net 3.4.0, сборка 1675 от 12.06.2018 внимание! если программа не работает, обновите версию! procedure println(self: array of real); extensionmethod; begin self.batch(5).foreach(s-> begin foreach var p in s do write(p: 15: 10); writeln end); writeln(min(15*(self.count div 2),38)*'- ') end; begin var m: =arrgen(readinteger('n='),i-> cos(i),1); m.println; var (a,b): =readreal2('введите границы a b: '); writeln('число элементов на интервале [',a,',',b,'] равно ', m.where(t-> t.between(a,); write('сумма элементов, расположенных после максимального, равна '); var imax: =m.indexmax; (m? [imax+1: ].sum).println; writeln('элементы, по убыванию модулей'); m: =m.orderbydescending(t-> abs(; m.println; end.
Abespal
11.01.2022
Потенциально нежелательные программы - программы, которые не рекомендованы для запуска на вашем устройстве, т.к. могут навредить вашему компьютеру. Могут пострадать многие системные файлы, также может быть потеряна важная информация БЕЗ возможности восстановления и множество других нежелательных для вас действий.
Проще говоря - это программы-вирусы.
Чтобы избежать заражение компьютера подобными программами, рекомендуется установить специальные утилиты для защиты вашего ПК (антивирусы) от потенциально нежелательных программ.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
1.напечатать таблицу умножения для числа 27 в qbasic, с операторов for, print, next.2.напечать таблицу перевода долларов в рубли от 10 до 100 шагом 10.также бейсик!