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

необходимо расставить действия так, чтобы робот посадил на все грядки цветы и пришел на точку P. Пункт "посади" можно взять только один раз.​


необходимо расставить действия так, чтобы робот посадил на все грядки цветы и пришел на точку P. Пун

Показать ответ
Ответ:
настяWebStorage
настяWebStorage
09.08.2022 23:48
#include <stdio.h> #include <stdlib.h> void build(int*, int ); void heap(int*, int); int main(void) { FILE *fin; int *a,n,i;   fin=fopen("input.txt", "r");   fscanf(fin,"%d", &n); a=(int*)malloc(n*sizeof(int)); for (i=0; i<n; i++) fscanf(fin,"%d", &a[i]); printf("pervona4alniy vid\n"); for (i=0; i<n; i++) printf("%d ", a[i]); printf("\n"); build(a, n); printf("\n postroenie\n"); for (i=0; i<n; i++) printf("%d ", a[i]); heap(a,n); printf("\n kone4niy vid\n"); for (i=0; i<n; i++) printf("%d ", a[i]); printf("\n"); return 0; } /* */ void build(int *a, int n) { int i,j,k,temp; for (i=0; i<n/2; i++) { j=2*i+1; k=i; if ((a[j+1]>a[j])&&(j+1<n)) j++; while ((j>0)&&(a[j]>a[k])) { temp=a[j]; a[j]=a[k]; a[k]=temp; j=k; k=(k-1)/2; } } } /* */ void heap(int *a, int n) { int nn,temp,i; nn=n; while (nn>0) { temp=a[0]; a[0]=a[nn-1]; a[nn-1]=temp; nn--; build(a,nn);   for (i=0; i<n; i++) printf("%d ", a[i]); } }  
0,0(0 оценок)
Ответ:
anastasia1231234
anastasia1231234
09.10.2020 07:24
// 1.

var
a,b,c: real;

begin
writeln('Введите два катета a,b: ');
readln(a,b);
writeln('Введите гипотенузу c: ');
readln(c);
 if sqr(c) = sqr(a) + sqr(b) then writeln('Треугольник прямоугольный.')
 else writeln('Треугольник не прямоугольный.');
end.

// 2.

var
A: array [1..100] of integer;
x,i,n: integer;

begin
writeln('Введите кол-во чисел N: ');
readln(n);
writeln('Введите числа: ');
for i:= 1 to n do readln(A[i]);
writeln('Вы ввели: ');
for i:= 1 to n do write(A[i]:4);
writeln;
for i:= 1 to n do if A[i] > -1 then x:=x+1;
writeln('Среди них положительных: ',x);
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота