Даны действительные числа (n< =150) удалить из последовательности те члены , поpядковые номеpа котоpых кpатны 4 , сохpанив пpежним поpядок оставленных членов.(за- мечание: удалить из существующего массива, а не создавать но- вый
245
468
Ответы на вопрос:
Var a: array of real; n,i,j: integer; begin randomize; write('n = '); readln(n); writeln('исходный массив: '); setlength(a,n); for i: =0 to n-1 do begin a[i]: =10*random; write(a[i]: 6: 2); end; writeln; for j: =n div 4 downto 1 do begin for i: =4*j to length(a)-1 do a[i-1]: =a[i]; setlength(a,length(a)-1); end; for i: =0 to length(a)-1 do write(a[i]: 6: 2); writeln; end. пример: n = 15 исходный массив: 8.17 9.96 5.06 9.34 2.91 7.37 3.64 7.22 2.83 3.04 2.02 9.09 0.32 5.10 9.35 8.17 9.96 5.06 2.91 7.37 3.64 2.83 3.04 2.02 0.32 5.10 9.35
#include < iostream> #include < iomanip> using namespace std; int main() { int n,x; cout< < "n = "; cin> > n; float a[n]; srand(time(null)); for (int i=0; i< n; i++) { a[i]=(rand()%100); a[i]/=10; cout< < a[i]< < " "; } cout< < endl; int i=3; while (i< n) { for (int j=i; j< n-1; j++) a[j]=a[j+1]; n--; i+=3; } for (int i=0; i< n; i++) cout< < a[i]< < " "; cout< < endl; system("pause"); return 0; }
1. var a, s, cifra: integer; begin s: = 0; writeln('введите натуральное число'); readln(a); while a > 0 do begin cifra: = a mod 10; //определяем очередную цифру числа s: = s + cifra * cifra * cifra; //прибавляем к значению s цифру в кубе a: = a div 10; //целочисленное деление числа на 10 (отсекаем текущую цифру) end; writeln('сумма кубов цифр числа: ', s); end. 2. var a: integer; begin writeln('введите натуральное число'); readln(a); while a > 9 do {определяем первую цифру числа путем отрезания цифр числа, пока число не станет однозначным. полученное число и будет первой цифрой} a: = a div 10; writeln('первая цифра числа: ', a); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kamola55514.02.2020 04:28
-
odariya12.06.2023 22:35
-
69supreme14.08.2020 05:02
-
lalove518.03.2022 23:03
-
ldfjwdsrerwv29.05.2023 17:34
-
Evilanda10.01.2023 20:57
-
legonsamp15.12.2021 09:11
-
tasyasoloveva2423.11.2021 16:00
-
AlbertoRey11.02.2022 16:33
-
7гогого7896шол01.07.2022 01:24
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.