Program znanija_com;
uses crt;
var
a,cch,dch,sq,o,c:real;
begin
writeln('Введите число А: ');
read(a);
cch:=Int(a);
dch:=frac(a);
sq:=sqr(a);
o:=frac(a/5);
writeln(cch,' ',dch,' ', sq,' ',o);
end.
последнее даже не понял что там нужно. так что держи без последнего
Процессор
Текстовый процессор — вид прикладной компьютерной
программы, предназначенной для производства (включая набор,
редактирование, форматирование, иногда печать) любого вида печатной
информации. Иногда текстовый процессор называют текстовым редактором
второго рода.
Текстовые процессоры, в отличие от текстовых
редакторов, имеют больше возможностей для форматирования текста,
внедрения в него графики, формул, таблиц и других объектов. Поэтому они
могут быть использованы не только для набора текстов, но и для создания
различного рода документов, в том числе официальных. Классическим
примером текстового процессора является Microsoft Word.
<em>// PascalABC.NET 3.2, сборка 1381 от 04.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
<em>Задача М</em>
begin
var a:=ReadInteger.ToString.AdjacentGroup;
var f:=False;
foreach var g in a do
if g.Count>1 then begin
Write('YES'); f:=true; break
end;
if not f then Write('NO')
end.
<u>Примеры</u>
5221
YES
1232
NO
<em>Задача О</em>
begin
var s:=ReadInteger.ToString;
if s.Length<>(s.Distinct).Count then Write('YES')
else Write('NO')
end.
<u>Примеры</u>
212
YES
12345
NO
Итак, помогу вам в очередной раз.
Нам необходимо найти формулу, чтобы вычислить значение ячейки D2, которая подходит под данную диаграмму. На самой диаграмме мы видим 2 равных элемента, для начала найдем их среди диапазона ячеек A2:C2.
1) A2 = A1 - B1.
Значение ячеек A1 и B1 смотрим в таблице и делаем так же по аналогии в других случаях
A2 = 4 - 2 = 2
Ячейка A2 равна 2
2) B2 = C1 - D1 = 3 - 1 = 2
И тут мы нашли две равные ячейки, по диаграмме мы видим, что они составляют 50% от общего значения, значит остальное значение равно сумме этих ячеек, то есть 4. Но на оставшейся части диаграммы заметно, что некоторая ее часть больше второй, значит одна часть будет равна 1, а вторая 3. Сейчас нам нужно найти значение ячейки C2, чтобы сделать вывод и найти ответ среди предоставленных вариантов
3) С2 = В1 - 1 = 2 - 1 = 1
Значение ячейки С2 = 1, следовательно значение D2 должно равняться 3. Находим подходящую формулу среди вариантов, чтобы в результате получилось 3.
1 Вариант: A1 - 2 = 4 - 2 = 2 - не подходит.
2 Вариант: А1 - 1 = 4 - 1 = 3 - здесь сразу же мы нашли подходящий вариант, можем дальше не проверять остальные
Ответ: 2)