Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Анд2007
21.08.2022 13:54 •
Информатика
Домашнее задание Каких известных художников Казахстана ты знаешь?
Найди информацию о них и запиши в тетрадь.
Показать ответ
Ответ:
morkovcha
17.07.2020 02:41
#include <stdio.h>
#include <iostream>
#include <malloc.h>
const int N = 10;
int main()
{
setlocale(LC_ALL, "RUS");
int i, j=0, n=0;
int array[N];
int *a;
puts("Исходный массив:");
for (i=0; i<N; i++) {
printf("Введите %d элемент:", i);
scanf("%d", &array[i]);
}
system("cls");
puts("Исходный массив:");
for (i=0; i<N; i++) {
printf("%d ", array[i]);
}
printf("\n");
for (i=0; i<N; i++)
if (array[i] == 0)
n++;
printf("Новый массив:\n");
a = (int *)malloc(n*sizeof(int));
for (i=0; i<N; i++)
if (array[i] == 0) {
a[j] = i;
printf("%d ", a[j]);
j++;
}
free(a);
printf("\n");
system("pause");
return 0;
}
Тестовое решение:
Исходный массив:
5 0 3 6 0 0 2 1 0 5
Новый массив:
1 4 5 8
Для продолжения нажмите любую клавишу . . .
0,0
(0 оценок)
Ответ:
swvw
27.03.2023 21:32
В PascalABC.Net
var
x:real;
begin
Writeln(' x y');
x:=-1;
while x<=1 do
begin Writeln(x:4:1,10-cos(Pi*x):10:5); x:=x+0.1 end
end.
Результат выполнения программы:
x y
-1.0 11.00000
-0.9 10.95106
-0.8 10.80902
-0.7 10.58779
-0.6 10.30902
-0.5 10.00000
-0.4 9.69098
-0.3 9.41221
-0.2 9.19098
-0.1 9.04894
0.0 9.00000
0.1 9.04894
0.2 9.19098
0.3 9.41221
0.4 9.69098
0.5 10.00000
0.6 10.30902
0.7 10.58779
0.8 10.80902
0.9 10.95106
1.0 11.00000
Замечание: В PascalABC константа Pi предопределена. В других версиях, если транслятор напишет сообщение о том, что переменная Pi не описана, в начале программы добавьте const Pi=3.14159265;
0,0
(0 оценок)
Популярные вопросы: Информатика
Zumman
13.06.2020 07:59
Впоследовательности чисел выдать на печать true, если значение максимального числа больше числа 10....
LizaVeta281
13.10.2021 19:11
Мне нужно написать 3 питання з информатики ы дати на них выдповыдь...
Vsevolod20141
04.04.2023 20:33
Создать жизненный цикл программного обеспечения по госту, все лишь бы сделали...
ехуотличница
01.01.2022 01:32
Информатика устройства носители ...
Alovelygirl1
12.11.2021 11:56
Как вывести на экран четные слова из предложения в Pascal...
krotkovaksenia1
09.08.2021 03:46
решить тест Тест «Среда программирования Pascal» 1) Какие имена программы допустимы в среде программирования Паскаль: а)picture б)самолет6 в) Myris 20 г) slon_132 д) lesl4 2) Какие...
гагарин9
20.11.2020 01:18
Які існують групи ефектів анімації для об єктів...
klassklassov
20.11.2020 01:18
Во ДАЖЕ ЗА 1 ОТВЕТ ТОЛЬКО ПРАВИЛЬНО Текстовый редактор - программа, предназначенная для a) управление ресурсами ПК при создании документов b) работы с изображениями в процессе создания...
плиз168
31.01.2020 00:22
На базу 28 т картофелч. весь картофель разложили в контейнеры по 100 кг. сколько потребовавалось контейнеров?...
слополоп
31.01.2020 00:22
Просклонять эти: 1) двое 2) четверо 3) оба 4) обе 5) 1985...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
#include <iostream>
#include <malloc.h>
const int N = 10;
int main()
{
setlocale(LC_ALL, "RUS");
int i, j=0, n=0;
int array[N];
int *a;
puts("Исходный массив:");
for (i=0; i<N; i++) {
printf("Введите %d элемент:", i);
scanf("%d", &array[i]);
}
system("cls");
puts("Исходный массив:");
for (i=0; i<N; i++) {
printf("%d ", array[i]);
}
printf("\n");
for (i=0; i<N; i++)
if (array[i] == 0)
n++;
printf("Новый массив:\n");
a = (int *)malloc(n*sizeof(int));
for (i=0; i<N; i++)
if (array[i] == 0) {
a[j] = i;
printf("%d ", a[j]);
j++;
}
free(a);
printf("\n");
system("pause");
return 0;
}
Тестовое решение:
Исходный массив:
5 0 3 6 0 0 2 1 0 5
Новый массив:
1 4 5 8
Для продолжения нажмите любую клавишу . . .
var
x:real;
begin
Writeln(' x y');
x:=-1;
while x<=1 do
begin Writeln(x:4:1,10-cos(Pi*x):10:5); x:=x+0.1 end
end.
Результат выполнения программы:
x y
-1.0 11.00000
-0.9 10.95106
-0.8 10.80902
-0.7 10.58779
-0.6 10.30902
-0.5 10.00000
-0.4 9.69098
-0.3 9.41221
-0.2 9.19098
-0.1 9.04894
0.0 9.00000
0.1 9.04894
0.2 9.19098
0.3 9.41221
0.4 9.69098
0.5 10.00000
0.6 10.30902
0.7 10.58779
0.8 10.80902
0.9 10.95106
1.0 11.00000
Замечание: В PascalABC константа Pi предопределена. В других версиях, если транслятор напишет сообщение о том, что переменная Pi не описана, в начале программы добавьте const Pi=3.14159265;