Type point = record x,y: real; end; var vc: array [1..4] of point; bg,nd: point; i,j,k,m: integer; begin writeln('координаты точек - через пробел '); for i: =1 to 4 do begin write('точка ',i,' '); readln(vc[i].x,vc[i].y); end; { сравнение векторов } m: =0; for i: =2 to 4 do begin bg.x: =vc[i].x-vc[1].x; bg.y: =vc[i].y-vc[1].y; j: =1; k: =1; while ((j=1) or (j=i)) do j: =j+1; while ((k=1) or (k=i) or (k=j)) do k: =k+1; nd.x: =vc[j].x-vc[k].x; nd.y: =vc[j].y-vc[k].y; if ((bg.x=nd.x) and (bg.y=nd.y)) or ((bg.x=-nd.x) and (bg.y=-nd.y)) then begin m: =1; break; end; end; if m=1 then writeln('точки образуют параллелограмм') else writeln('точки не образуют параллелограмм'); end.
Tatyana Anton1475
30.06.2022
#include < stdio.h> int main(void) { /* переменная для хранения числа */ double chislo; /* сообщение с запросом для пользователя */ printf("введите ваше число: "); /* считывание числа в определенном формате в определенное место */ scanf("%f", & chislo); /* проверяем, является ли число большем нуля (положительным)*/ if (chislo > 0) { /* если да, то прибавляем единицу (операция инкремент) */ chislo++; } else { /* если число отрицательное, то вычитаем из числа двойку */ chislo -= 2; } /* выводим результата */ printf("результата: %f", chislo); return null; }
n=str(input('это число: '))
summ=0
for l in n:
summ=summ+int(l)
print(summ)