
Вопрос задан 23.02.2019 в 04:16.
Предмет Информатика.
Спрашивает Громыко Данил.
Помогите пожалуйста решить задачку....ввести a и b и вывести квадрат и кубы чисел от a до
bПример:Введите границы интервала4 16 645 25 1256 36 216

Ответы на вопрос

Отвечает Лутфуллин Мансур.
Var
a,b:integer;
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
For b:= a to b do
WriteLn(b,' ',b*b,' ',b*b*b);
End.
a,b:integer;
Begin
Write('a = ');ReadLn(a);
Write('b = ');ReadLn(b);
For b:= a to b do
WriteLn(b,' ',b*b,' ',b*b*b);
End.



Отвечает Филипенко Женя.
Код Pascal1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 const n=100; type arr=array[1..n] of integer; var a:arr; skv:real; i,k,l:integer; procedure print(s:string;a:arr;l:integer); var i:integer; begin writeln(s); write('['); for i:=1 to l-1 do write(a[i],', '); writeln(a[l],']'); end; procedure sort(var a:arr;l:integer); var i,j,t:integer; begin for i:=1 to l-1 do for j:=i to l do if a[j]<a[i] then begin t:=a[j]; a[j]:=a[i]; a[i]:=t; end; end; begin repeat write('Количество элементов массива:'); readln(k); until (k>0) and (k<101); write('Введите массив:'); for i:=1 to k do repeat write('a[',i,']='); readln(a[i]); until (a[i]>-11) and (a[i]<11); print('Оригинальный массив:',a,k); l:=0;skv:=0.0; for i:=1 to k do if a[i]<0 then begin a[i]:=sqr(a[i]); skv:=skv+a[i]; l:=l+1; end else a[i]:=i; print('Полученный массив:',a,k); sort(a,k); print('отсортированный массив:',a,k); writeln('Среднее арифметическое квадратов отрицательных чисел:',skv/l:0:4); readln; end.



Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.
Задача: Вывести квадраты и кубы чисел от a до b
Чтобы решить данную задачу, мы должны ввести значения для переменных a и b, а затем вывести квадраты и кубы чисел в интервале от a до b.
Шаг 1: Введите значения для переменных a и b.
В примере, который вы привели, значения a и b равны: a = 4, b = 16
Шаг 2: Вывести квадраты и кубы чисел от a до b.
Квадрат числа можно получить, умножив число на само себя, а куб числа можно получить, умножив число на его квадрат.
Вот как можно решить данную задачу на языке Python:
```python # Ввод значений a и b a = 4 b = 16
# Вывод квадратов и кубов чисел от a до b for i in range(a, b


Топ вопросов за вчера в категории Информатика

Информатика 565

Информатика 25

Информатика 22

Информатика 27

Информатика 34

Информатика 58

Информатика 63

Информатика 23
Последние заданные вопросы в категории Информатика
Предметы
-
Математика
-
Литература
-
Алгебра
-
Русский язык
-
Геометрия
-
Английский язык
-
Химия
-
Физика
-
Биология
-
Другие предметы
-
История
-
Обществознание
-
Окружающий мир
-
География
-
Українська мова
-
Информатика
-
Українська література
-
Қазақ тiлi
-
Экономика
-
Музыка
-
Право
-
Беларуская мова
-
Французский язык
-
Немецкий язык
-
МХК
-
ОБЖ
-
Психология
-
Физкультура и спорт
-
Астрономия
-
Кыргыз тили
-
Оʻzbek tili