№1
var chislo, sum: integer;
begin
repeat
writeln('Введите трехзначное число:');
readln(chislo);
until chislo in [100..999];
while chislo > 0 do
begin
sum := sum + chislo mod 10;
chislo := chislo div 10;
end;
if sum mod 2 = 0 then
write('Число четное')
else write('Число нечетное');
readln;
<span>end.
</span>
№2
var factorial: longint; chislo, i: byte;
begin
chislo := 5;
factorial := 1;
for i := 2 to chislo do
factorial := factorial * i;
writeln('5! = ', factorial);
<span>end.</span>
Звуковые и видеофайлы имеют большой информационный объем.Для передачи таких файлов по компьютерным сетям в стандартных цифровых форматах требуются линии связи с высокой пропускной способностью. Цифровой стереозвук высокого качества требует скорости передачи данных, равной 1,5 Мбит/с.Цифровое видео телевизионного стандарта требует для передачи изображения скорости передачи данных около 240 Мбит/с.Для уменьшения объемов звуковых и видеофайлов без ощущаемой потери качества используются специальные методы сжатия, основанные на удалении не воспринимаемой человеком звуковой или видеоинформации.
Широкое распространение в Интернете получили технологии передачи потокового звука и видео. Эти технологии передают звуковые и видеофайлы по частям в буфер локального компьютера, что обеспечивает возможность их потокового воспроизведения даже при использовании модемного подключения. Снижение скорости передачи по каналу может приводить к временным пропаданиям звука или пропускам видеокадров.Для прослушивания потокового звука и просмотра потокового видео используются мультимедиа проигрыватели. Во время воспроизведения потокового мультимедиа файла пользователь получает информацию о скорости передачи данных и может настраивать качество воспроизведения.
Существует достаточно много радио- и телевизионных станций, которые осуществляют вещание через Интернет. Широкой популярностью пользуются Web-камеры, установленные в самых разных уголках мира (на улицах городов, в музеях, в заповедниках и т. д.) и непрерывно передающие изображение
P.s все что нашла
Var s,k integer; //обозначили переменные.Тип integer говорит что это целые числа.
Begin
s:=0; //Присваеваем s значение 0.Тоесть s у нас в начале программы ровно нулю.
for k:=3 to 8 do s:=(s+3)*k; //Тут k присваеваем значение 3.Поэтому, от 3 до 8 делаем " s:=(s+3)*k".Тоесть (8-3=5) 5 раз выполняем s:=(s+3)*k.
Пишу ход выполения программы:
s:=(0+3)*3=9 // тут значение s стало ровно 9.
s:=(9+3)*3=12*3=36 // тут значение s стало ровно 36. И так далее.
s:=(36+3)*3=39*3=39*3=117
s:=(117+3)*3=120*3=360
s:=(360+3)*3=363*3=1089
write(s); // выводим значение рассчитанной s.
End. // конец программы.
#include <iostream>
using namespace std;
const int N = 8; //длина массива
double s = 0; //начальное значение суммы
double mas[N]; //объявляем статический массив длины N
int main()
{
//вводим элементы массива
for(int i = 0; i < N; ++i)
{
cin >> mas[i];
}
//пробегаемся по элементам массива
for(int i = 0; i < N; ++i)
{
if(mas[i] != 0.0) //если элемент массива не равен 0
s += 1. / mas[i]; //прибавляем значение обратного элемента к итоговой сумме
}
cout << s; //вывод суммы на экран
return 0;
<span>}</span>
Опредилить основания классификаций:а)ель,сосна,кедр,пихта/берёза,осина,липа,тополь;б)рожь,тишь,ложь,рысь/пшеница,тишина,истина,к
Alx2040 [567]
А) хвойные/лиственные деревья
б) существительные женского рода 3 / 1 склонения
в) одежда / верхняя одежда
г) дикие / домашние животные