Program Archi;
uses crt;
var
x:real;
begin
writeln('*** alphaues is thinking... ***');
writeln('*** OK ***');
writeln();
write('Введите x: ');
readln(x);
writeln('При х=',x,'');
writeln('3sin(sqrt(3))+0,35x-3,8 = ',3*sin(sqrt(3))+0.35*x-3.8:0:3);
end.
Так как в условии 2 союза и,то для того,чтобы запись подошли все 3 условия должны совместно выполнены.
На фото видно(для наглядности поставил точки).
Там где есть три точки по условиям,те записи подходят.
Var a = [0, ...] - Множество, состоящее из чисел.
console.log(a) - выводит "a" в консоль.
var f1 = 0 - объявление переменной целого типа и инициализация её нулем.
for(i=0;i<a.length-1;i++) - цикл от нуля до a.length - 1 с шагом 1.
{
if(a[i] >=a[i+1]) { - если "a" iтое больше либо равно "a" iтому + 1 тогда
f1=1; - присваивание переменной f1 числа 1.
break; - остановка цикла.
}
}
if(f1 == 1) { - если f1 равно 1 тогда
for(i=0;i<a.length-1;i+=4) { - цикл от нуля до a.length - 1 с шагом 4.
a[i] *= 2; - значение "a" iтое умножается на 2. (все содержимое a[i])
}
}
RAR, ZIP, ARJ, JPEG, MP4 и много других форматов - практически любой формат это некое сжатие информации для компактного хранения.
В виде исключения приходят на память только TXT, WAV и быть может BMP
// 30° = π/6, 60° = π/3
Program goldobin5;
uses crt;
begin
clrscr;
writeln('Y=',(sqrt(sin(pi/6))+sqrt(abs(32-6*8)))/(sqr(sqr(sin(pi/3)))));
end.
Результат:
Y= 8.368189833220529e+00