4 года назад

3. Электронным ресурсом не является : A) настенный календарь B) фильм на диске C) статья на веб -сайте D) сообщения на телефоне

Знания

Информатика

1 ответ:

Varvara Pahomova4 года назад

0 0

настенный календарь, так как он выполнен на бумажном носителе.

Читайте также

1=>5,1=>50,1=>99 Можно только умножать на 2 и прибавлять на 1

sdjn

1. Существует всего 4 способа: (1: +1; 2:*2);
1111 121 221 2111
2. Существует всего 786 способов.
Некоторые из них: 22221111111112 12221111111112
3. Существует всего 9042 способа.
Один из них: 222221111111111111111121

0 0

1 год назад

Напишите программу, которая вычисляет количество цифр числа. Используйте функцию.

Alexis1965

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

function nDigits(n:int64):integer; // если число
begin
Result:=0;
if n<0 then n:=-n;
while n>0 do begin
 Result+=1;
 n:=n div 10
 end
end;

function nDigits(s:string):=s.Length; // если строка

begin
Writeln(nDigits(1234567890123456)); // 16
Writeln(nDigits('123456789012345678901234567890')) // 30
end.

Результат
16
30

0 0

4 года назад

Составьте программу паскаль, которая определяет значение функции y=|x|. То есть вводишь y и она (программа) должна показать знач

rinat265

PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018
Внимание! Если программа не работает, обновите версию!

begin
Abs(ReadReal).Println
end.

0 0

4 года назад

Уровень B. Напишите программу, которая сортирует массив и находит количество различных чисел в нем.

Ромалэ [7]

// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var a:=ArrRandom(ReadInteger('n='),10,99);
a.Println.Sorted.Println;
Writeln('Количество разных чисел ',a.Distinct.Count)
end.

Тестовое решение:
n= 20
60 33 12 47 79 81 33 26 73 98 82 81 71 70 96 48 13 66 29 85
12 13 26 29 33 33 47 48 60 66 70 71 73 79 81 81 82 85 96 98
Количество разных чисел 18

0 0

4 года назад

1. Выразите число 22412 в 10-ой системе счисления.

Дмитрий2106 [7]

Из какой системы переводить?

0 0

4 года назад