4 года назад

Необходимо вывести числа от -3 до 7. random(6); random(-3,7); random(-3)+7; random(7)-3.

Знания

Информатика

1 ответ:

Владимир197311154 года назад

0 0

Если нужно вывести в Pascal ABC, то ответ : random (-3;7)

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

После окончания 7 класса в классе было S отличников, а после окончания 9 класса уменьшилось до V отличников.Составить программу

jnmjnm

Программа на паскале нужна?

program pro;

var S,V,Result:integer;

begin
readln(S,V);
Result:=S-V;
writeln(Result);
end.

0 0

4 года назад

определить площадь треугольника, если известны основания и высота. BASIC

Тыдра [407]

CLS

INPUT "введи основание"; a

IF a<=0 THEN PRINT "не может быть": GOTO a

INPUT "введи высоту"; h

IF h<=0 THEN PRINT "не может быть": GOTO a

S=a*h/2

PRINT "площадь треугольника равна"; S

END

0 0

4 года назад

В алфавите формального (искусственного) языка имеется всего два знака – "крестик" и "нолик". Каждое слово этого языка состоит ро

Gorlova88

Крестик например это 1 бит
следовательно всего используется 5 бит на одно слово.
2^5=64 слов
Ответ: максимальное количество слов в данном алфавите 64.

0 0

4 года назад

Все 4-буквенные слова, составленные из букв К Л Р Т записаны в алфавитном порядке и пронумерованы. 1. кккк 2. кккл 3. кккр 4. к

sean2323 [13]

К - 0
Л - 1
Р - 2
Т - 3
(четверичная система счисления (используется 4 цифры))
Нужно найти слово стоящее под номером 67 => это 66 в десятичной системе счисления(не 67,т.к. последовательность начинается с 0)
66(10) переведём в четверичную систему счисления - это 1002 = лккр
Ответе: лккр

0 0

4 года назад

Программа получает на вход последовательность целых неотрицательных чисел, каждое число записано в отдельной строке. Последовате

otos [1.5K]

A = int(input())
k = 0
while a != 0:
k = k+1
a = int(input())
print(k)

Пример:
15
87
60
45
73
0
15
47
5

0 0

2 года назад