Static void Main()
{
String str = Console.ReadLine();
Byte N = Byte.Parse(Console.ReadLine()),
i = 1;
while (i <= N)
{
Console.Write(str);
i++;
}
Console.ReadLine();
}
<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var x := Frac(Abs(ReadReal('Введите исходное число:'))).ToString;
var k := ReadInteger('Введите значение k:');
var (s1, s2) := (x[3:3 + k], x[3 + k:3 + 2 * k]);
if s1.Select(t -> t.ToDigit).Sum = s2.Select(t -> t.ToDigit).Sum then
Println('Суммы равны')
else
Println('Суммы не равны')
end.
<h3>Введите исходное число: -542.6327288323</h3><h3>Введите значение k: 3</h3><h3>Суммы не равны </h3>
Ответ:
Объяснение:
Вот что получилось -2676810695814762278, не знаю как ты хочешь получить из этого ip ХD
Var
i, s: integer;
begin
s := 0;
for i := 15 to 25 do s := s + sqr(i);
Writeln('s=', s)
end.
Тестовое решение:
s=4510
***********************************
const
n = 10;
var
i, k: integer;
a: array[1..n] of integer;
begin
Randomize;
k := 0;
Write('Массив данных: ');
for i := 1 to n do
begin
a[i] := Random(26);
Write(a[i]:3);
if a[i] > 12 then k := k + 1
end;
Writeln(#13#10, 'k=', k)
end.
Тестовое решение:
Массив данных: 0 21 20 8 14 15 25 11 2 20
k=6
Материнская плата - служит для построения самого ПК.
Процессор (ЦП) - выполнение разных операций, инструкций, мозг ПК.
ОЗУ (Оперативная память) - во время работы компьютера содержит в себе разную информацию.
Чипсет - так называемый мост между компонентами, северный как правило соединяет ЦП и ОЗУ, а южный PCI разъёмы и другие порты.
Блок питания - даёт электричество каждому компоненту.
Видеокарта - как правило преобразует информацию из цифровой в графическую
Жёсткий диск(HDD) или твердотелый накопитель (SSD) - отвечает за сбережение информации.
P.S.
Чипсет это компонент самой материнской платы, но он тоже считается важным.
Ещё стоит упомянуть батарейку CMOS которая хранит настройки BIOS или UEFI, но компьютер может спокойно работать без неё, поэтому указывать её не стоит.