ZaY40nOK
21.04.2023 01:49

1.Яка функція перетворює рядок S в ціле число ? *
IntToStr (Value)
StrToInt (S)
FloatToStr (Value)
StrToFloat (S)
2.var A : Real; B: Integer;В яких операторах правильно організовано введення значень змінних? *
А := StrToFloat(Edit1.Text);
В := StrToInt(Edit1.Text);
А := StrToInt(Edit1.Text);
Edit1.Text := FloatToStr (А);
3.var X, Y: Integer;Чому дорівнює значення Х після виконання послідовності присвоювань: Х := 10; Y := 3*Х; Х := Х + Y; *

4.Для розміщення на формі перемикача потрібно на вкладці Standart двічі клацнути на кнопці... *

TCheckBox
TComboBox
TRadioBox
TRadioButton
5.Яке значення набуває властивість Checked прапорця , якщо прапорець вибрано і позначку прапорця встановлено *
false
true
false або true
жодної
6.Якщо на формі розміщено кілька прапорців, то серед них можна вибрати... *
Один або кілька
тільки один
два
не вибрати жодного
7.Чому дорівнює S після виконання циклу: S := 0; For і := 5 To 7 Do S := S+1; *
4
3
7
5
8.Який загальний вигляд команди циклу з лічильником? *
for <імя змінної>:= <вираз1> to <вираз2> do begin <команди тіла циклу> end;
for <імя змінної>:= <вираз1> to <вираз2> begin <команди тіла циклу> end;
for <імя змінної>:= <вираз1> to <вираз2> do begin <команди тіла циклу> ;
9.Встановіть відповідність між операторами і діями, які вони реалізуютьf := 0; For i := 1 To n Do f := f +і; *
Обчислити суму n перших натуральних чисел
Обчислити факторіал числа n
Обчислити суму n перших парних чисел
Обчислити f = A*n
10.В яких із наведених операторів циклу тіло циклу не виконається жодного разу? *
Х:=10; Whіle Х <= 10 do X := X+1;
Х:=11; Whіle Х <= 10 do X := X+1;
11.Визначте значення S після виконання операторів.X := 0 ; S := 0;Whіle Х<=5 Do begin X := X + 1; S := S + Х; end; *

12.Який алгоритм реалізує програма S := 0; A := 0; n:=0;Whіle n<10 Do begin n:=n+1; A := A+2; S := S+A; end; *
Знайти суму натуральних чисел, кратних 4 і менших або рівних 100
Знайти суму перших десяти непарних чисел
Знайти суму перших десяти парних чисел

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
danila110420051
28.06.2020 09:43

using System;

namespace ConsoleApp5

{

   class Program

   {

       static void Main(string[] args)

       {

           bool f;

           double a,b,c, s, s1;

           a = double.Parse(Console.ReadLine());

           b = double.Parse(Console.ReadLine());

           c = double.Parse(Console.ReadLine());

           s = Math.Sqrt(((a + b + c) / 2) * (((a + b + c) / 2) - a) * (((a + b + c) / 2) - b) * (((a + b + c) / 2) - c));

           a = double.Parse(Console.ReadLine());

           b = double.Parse(Console.ReadLine());

           c = double.Parse(Console.ReadLine());

           s1= Math.Sqrt(((a + b + c) / 2) * (((a + b + c) / 2) - a) * (((a + b + c) / 2) - b) * (((a + b + c) / 2) - c));

           if (s == s1)

               f = true;

           else

               f = false;

           Console.WriteLine(f);

           Console.ReadKey();

       }

   }

}

0,0(0 оценок)
Ответ:
Grayr2005
28.06.2020 09:43

#include <iostream>

#include <cmath>

using namespace std;

#define ld long double

struct triangle{

   ld a;

   ld b;

   ld c;

};

ld square(triangle t){

   ld p = (t.a + t.b + t.c)/2;

   return sqrt(p * (p - t.a) * (p - t.b) * (p - t.c));

}

triangle t1,t2;

void solve(){

   if(square(t1) == square(t2))

       cout << "ИСТИНА";

   else

       cout << "ЛОЖЬ";

}

signed main() {

   ios_base::sync_with_stdio(0);

   cin.tie(0);

   cout.tie(0);

   cin >> t1.a >> t1.b >> t1.c >> t2.a >> t2.b >> t2.c;

   solve();

}

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота