Решить алгоритм: начало 2. а: =3 3. a 21 4.ложь а: =а+а 5.истина а: =а*а 6.ложь а 42 7.истина покажи - id472993220200226 от viktorialychykowtuu4 26.02.2020 02:00

Question

Информатика: Решить алгоритм: начало 2. а: =3 3. a 21 4.ложь а: =а+а 5.истина а: =а*а 6.ложь а 42 7.истина покажи а конец

viktorialychykowtuu4 · Accepted Answer

Это код консольного приложения program Project2; {$APPTYPE CONSOLE} uses   SysUtils, Windows; function storona(x1,y1,x2,y2: real): real; var s: real; begin   s:=sqrt(sqr(x1-x2)+sqr(y1-y2));   storona:=s; end; var   x1,y1,x2,y2,x3,y3: real;   l1,l2,l3: real; begin   //Переключение окна консоли на кодовую страницу CP1251 (Win-1251).   //Если после переключения русские буквы показываются неверно,   //следует открыть системное меню консольного окна - щелчком мыши в левом   //верхнем углу окна консоли...

Решить алгоритм: начало 2. а: =3 3. a> 21 4.ложь а: =а+а 5.истина а: =а*а 6.ложь а> 42 7.истина покажи а конец

MOGZ ответил