ahmad7froukhp00vlz
04.01.2021 01:28

В Bios нету пункта OnBoard LAN вообще. Windows 7

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
BlackStar14
09.05.2022 11:32
Using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;

namespace zn
{
    class Program
    {
        public static void Main(string[] args)
        {
            Console.Write("Введите кол-во минут по тарифу: ");
            int a = Convert.ToInt32(Console.ReadLine());
            Console.Write("Введите цену за минуту по тарифу: ");
            int b = Convert.ToInt32(Console.ReadLine());
            Console.Write("Введите цену за минуту сверх тарифа: ");
            int c = Convert.ToInt32(Console.ReadLine());
            Console.Write("Введите время пользования услугами связи за месяц в минутах: ");
            int d = Convert.ToInt32(Console.ReadLine());
            int res = a > d ? a * b : a * b + (d - a) * c;
            Console.WriteLine("Плата за пользование: " + res);
            Console.ReadKey();
        }
    }
}
0,0(0 оценок)
Ответ:
vkuke
30.12.2020 04:06

1)  

var mas:array[1..7] of integer;

    i:integer;

begin

writeln('Введите 7 целых чисел:');

for i:=1 to 7 do

begin

readln(mas[i]);

if(mas[i] mod 2 <>0) then mas[i]:=mas[i]*10;

end;

writeln('Изменённый массив:',mas);

end.

2) var mas:array[1..9] of integer;

    i,b:integer;

begin

writeln('Введите 9 целых чисел:');

for i:=1 to 9 do

begin

readln(mas[i]);

if(mas[i] <0) then b:=b+mas[i];

end;

writeln('Сумма отрицательных элементов= :',b);

end.

3) var mas:array[1..4] of integer;

    i,b:integer;

   

 

begin

writeln('Введите 4 целые числа:');

b:=1;

for i:=1 to 4 do

begin

readln(mas[i]);

b:=b*mas[i];

 

end;

writeln('Произведение чисел= ',b);

end.

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