Tramontino
14.01.2020 14:01

Что не входит в виды информации по восприятия? зрительная звуковая обонятельная нервная

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Mrztr
30.11.2022 14:17

#include <iostream>

#include <cmath>

using namespace std;

int main()

{

   float x1, y1, x2, y2, x3, y3, v1, v2, b1, b2;

   cout << "x1 y1: ";

   cin >> x1 >> y1;

   cout << "x2 y2: ";

   cin >> x2 >> y2;

   cout << "x3 y3: ";

   cin >> x3 >> y3;

   v1 = x1 + x2;

   v2 = y1 + y2;

   b1 = x1 + x3;

   b2 = y1 + y3;

   cout << "Sum 1: " << "(" << v1 << ";" << v2 << ")" << endl;

   cout << "Sum 2: " << "(" << b1 << ";" << b2 << ")";

}

0,0(0 оценок)
Ответ:
Urjdifk135
08.10.2022 11:42
1
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 2 = 0
        then
            Writeln('Число чётное')
        else
            Writeln('Число не чётное');
    readln;
end.

2
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 3 = 0
        then
            Writeln('Число делится на 3')
        else
            Writeln('Число не делится на 3');
    readln;
end.

3
program z;
var
    i: array[1..6] of byte;
    x:byte;
begin
    for x:=1 to 6 do
    
        begin
            Writeln('Введите ', x,' цифру из 6 ');
            Read(i[x]);
        end;
    if (i[1]+i[2]) = (i[4]+i[5]+i[6])
        then
            Writeln('Билет счастливый')
        else
            Writeln('Билет не счастливый');
    Readln;
end.
        
5)))
program z;
var
    i : integer;
begin
    Writeln('Введите число'); Readln(i);
    if i mod 6 = 0
        then
            Writeln('Число делится на 6')
        else
            Writeln('Число не делится на 6');
    readln;
end.
6
program z;
var
    a,b:integer;
begin
    Writeln('Введите число A'); Readln(a);
    Writeln('Введите число B'); Readln(b);
    if b mod a = 0
        then Writeln('Число А делится нацело на число В')
        else Writeln('Число А не делится нацело на число B');
    Readln;
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота