написать программу на Паскале. Цель следующая: Задана последовательность: Какое наименьшее количество - id2044615020210613 от vustiya69 13.06.2021 07:21

Question

Информатика: написать программу на Паскале. Цель следующая: Задана последовательность: Какое наименьшее количество членов последовательности нужно сложить, чтобы сумма стала больше 1000? Желательно использовать цикл for или repeat.

vustiya69 · Accepted Answer

// тестировалось на C#.Net Framework 4.5 using System; class Program {     static void Main()     {         int x1 = 2, y1 = 1;         int x2 = 6, y2 = 5;         int x3 = 10, y3 = 1;         var a = Distance(x2, y2, x3, y3);         var b = Distance(x1, y1, x3, y3);         var c = Distance(x2, y2, x1, y1);                 Console.WriteLine( S = {0} , Square(a, b, c));         Console.ReadKey();     }     //растояние между точками     static double Distance(int x1, int y1, int x2, int y2)     {...

MOGZ ответил