М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
мария22228
мария22228
03.11.2022 22:52 •  Информатика

Вдень группа туристов покупает 10 буханок хлеба по а рублей,. 5 батонов по в тенге, 10 шт консервов по с рублей,. ведро картошки за д рублей на оставшиеся деньги они приобретают другии продукты составте программу запрашивающию значение переменных и подшитывающию какое кол-во денег остается на приобретенные остальных товаров от суммы в к рублей

👇
Ответ:
Dishame
Dishame
03.11.2022
Решение на паскаль во вложении
Вдень группа туристов покупает 10 буханок хлеба по а рублей,. 5 батонов по в тенге, 10 шт консервов
4,4(34 оценок)
Открыть все ответы
Ответ:
sabserj
sabserj
03.11.2022
 
program Project2;
{$APPTYPE CONSOLE}
uses
SysUtils,windows;

var a,b:array of real;   
 i:byte; 
 cs,sk,da,db:real;    n:integer;
begin
SetConsoleOutputCP(1251);
randomize;
writeln('Введите n');
readln(n);
Setlength(a,n);
Setlength(b,n);
writeln('Вектор À');
for i:=0 to high(a) do 
begin 
 a[i]:=-5+10*random;
  write(a[i]:5:1);
 end;
writeln;
writeln('Вектор B');
for i:=0 to High(b) do
 begin 
 b[i]:=-5+10*random;
  write(b[i]:5:1);
 end;
writeln;
{Скалярные произведения и длинны векторов}
sk:=0;
da:=0;
db:=0;
for i:=0 to n-1 do 
begin 
 sk:=sk+a[i]*b[i];
  da:=da+sqr(a[i]);
  db:=db+sqr(b[i]); 
end;
{Косинус}
cs:=sk/sqrt(da)/sqrt(db);
write('Cos(aльфа)=',cs:0:3);
readln;
end.
4,6(37 оценок)
Ответ:
gulitenko
gulitenko
03.11.2022
Using System;

class Program
{
    static void Main()
    {
        var random = new Random(DateTime.Now.Millisecond);
        int n = 5;
        int k;
        var c = new int[n, n];
        var b = new int[n];
        
        Console.WriteLine("C:");
        for (var i = 0; i < n; i++)
        {
            for (var j = 0; j < n; j++)
            {
                c[i, j] = random.Next(0, 9);
                Console.Write(c[i, j] + " ");
            }
            Console.WriteLine();
        }
        Console.WriteLine();
        for(int j = 0; j < n; j++) {
        k = 0;
        for(int i = 0; i < n; i++)
          if (c[i, j]==0) k++;
        b[j] = k;
        }
        Console.WriteLine("B:");
        for(int i = 0; i < n; i++)
            Console.Write(b[i] + " ");
        Console.WriteLine();
        Console.ReadKey();
    }
}

Пример:
C:
3 5 1 3 0
1 6 4 1 7
5 2 5 1 2
4 6 3 0 3
2 3 8 0 7
 
B:
0 0 0 2 1
4,4(79 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ