<h3>PascalABC.NET 3.4.2, сборка 1843 от 24.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var (v, s, t) := (55, 200, 20);
Println(v * 1000 / 3600 * t > s ? 'Да' : 'Нет')
end.
<h2>Да</h2>
Поворот 72 градуса по часовой стрелке. Внутренний угол фигуры = 180 - 72 - 108. У пятиугольника как раз такой угол и есть.
Ответ: 3 - правильный пятиугольник
1.Что такое компьютер?
Это устройство или система, способная выполнять особые операции, а также вычисления.
2.Что такое Операционная Система(ОС)?
Это комплекс взаимосвязанных программ, предназначенных для управления компьютером, операциями и также управления ресурсов.Есть 3 особо популярной ОС, это Windows, Linux, Mac.
3.Что такое материнская плата?
Это сложная многослойная печатная плата, являющаяся основой построения вычислительной системы.
4.Что такое видеокарта?
Это устройство, преобразующее графический образ, хранящийся как содержимое
памяти компьютера, в форму, пригодную для
дальнейшего вывода на экран монитора.
5.Что такое процессор?
Это "мозг" компьютера, тоесть это устройство, которое способно обрабатывать программный код определяющее основные функции компьютера по обработке информации.
6.Что такое Оперативная Память?(Основное Запоминающийся Устройство, в сокр. ОЗУ)
Это память, часть системы памяти ЭВМ, в которую процессор может обратиться за одну операцию. Предназначена для временного хранения данных и команд, необходимых процессору для выполнения им операций. Оперативная память передаёт процессору данные непосредственно, либо через кеш-память. Каждая ячейка оперативной памяти имеет свой индивидуальный адрес.7.Что такое Жёсткий Диск?
Это основное хранилище информации на твоем компьютере, которую можно изменять, создавать и т.п
Если b будет равен нулю, то программа выйдет за границы массива
и после цикла for нужно ставить do begin т.к выполняется два оператора
<span>b:=random(n)+0;
Writeln(a[b]);
после них добавить ещё end;</span>
// PascalABC.NET 3.0, сборка 1157 от 02.02.2016
begin
var s:=ReadlnInteger('Число:').ToString;
if Pos(ReadlnString('Цифра:'),s)>0 then Writeln('Есть в числе')
else Writeln('Нет в числе')
end.
<u><em>Тестовое решение:</em></u>
Число: 634
Цифра: 3
Есть в числе