До іть ів зробіть будь-ласка скрін в пайтоні як це ви зробили

Program num1;
Uses crt;
Var x:array[1..10] of real;
max:real;
i : integer;
Begin
clrscr;
for i:=1 to 10 do
begin
write('x[',i,']=');readln(x[i])
end;
max:=x[1];
for i:=1 to 10 do
if x[i]>=max then max:=x[i];
Writeln('Max=',max:3:1);
for i:=1 to 10 do
if x[i]=max then begin x[i]:=0;break end;
for i:=1 to 10 do write(' *',x[i]:3:1,'* ');
End.

b:=7+(2143 div 100)*10=7+(21*10)=7+210=217;

a:=(10*217-2143) mod 10=(2170-2143) mod 10=27 mod 10=7

ответ: a:=7; b:=217

Я, в основном, программы на С++ пишу, но из школы про Паскаль кое-что помню (в смысле, попытаюсь написать на Паскале).

Program A1;

var a,b,c,i:integer;

begin

write('Enter the a: ');

read(a);

writeln('Enter the b: ');

read(b);

с:=0;

for i:=1 to a Do

     c:=c+b;

writeln('a*b=',c:5:0);

end.

Объясняю (начинаю сразу с цикла for): что значит произведение двух натуральных чисел а и b - это означает, сложить b с самим собой по а раз (можно и наоборот). Например, a=5, b=3. Переменную с=0 будем складывать с b.

i=1      c=5+0;

i=2      c=5+5;

i=3      c=10+5;   //c=15

Вот и есть ответ: 5*3=15.

4 Мбайт

Объяснение:

Изначально отводилось 24 бита на пиксель, после преобразования - 8 бит на пиксель (256 = 2^8).

Количество бит на пиксель уменьшилось в 24/8 = 3 раза, тогда и весь объём файла уменьшится в 3 раза

Средний размер преобразованной фотографии 12 Мбайт / 3 = 4 Мбайт

Задание немного смутное, но всё-таки, расставив всё по полочкам, понять можно.

Операторы, изменяющие значение условия, в некоторых случаях не используется. Например когда мы заполняем массив из трёх элементов, мы заранее определяем момент выхождения из цикла. For i:=1 to 3 do ... end; Также есть много других примеров, но для ответа на этот вопрос, достаточно.)))

переведем 375 байтов биты это будет3000бит.дальше мы 3000бит делим на 500 символов=6бит весит 1 символ.т.к N=2в степени i ТО ПОЛУЧАЕТСЯ МЫ 2 УМНАЖАЕМ 6 РАЗ И ПОЛУЧИМ ОТВЕТ 32 БУКВЫ МОЩНОСТЬ АЛФАВИТА)

Источник информации: голосовые связки медведя

Оборонительный звук, издаваемый медведем (частота 400–500 Гц), предупреждает о том, что рядом есть медведь и он злится, лучше с ним не пересекаться. Человек воспринимает эту информацию при ушей, обрабатывает и принимает решение, которое может ему жизнь.

#include<iostream>

#include<conio.h>

#include<Windows.h>

#include<cmath>

using namespace std;

int main() {

SetConsoleCP(1251);

SetConsoleOutputCP(1251);

const int N = 15;

int arr[N],a=0;

cout << "Введите 15 чисел в интервале от -30 до 30: ";

for (int i = 0;i < N;i++) {

 cin >> arr[i];

 if (arr[i] < -30 || arr[i]>30) {

  cout << "Ошибка!";

  break;

 }

 if (arr[i] > 0) {

  a++;

 }

}

cout << "Кол-во положительных чисел из заданного интервала = " << a;

_getche();

return 0;

}

бит приходится на 1 символ

количество символов в данном алфавите

4 бита информации получили болельщики