Var
a,n,i,k:integer;
Begin
Readln(n);
k:=0;
i:=0;
while i<n do
Begin
readln(a);
if a>0
then k:=k+1;
i:=i+1;
end;
Writeln(k);
End.
Если не будет хватать одного выполнения то напишешь "while i<n+1 do"
Название книги автор жанр
Дюймовочка Андерсен Х.К. сказки
Серебрянное копытце Бажов П.П. сказки
Мишкина каша Носов Н. рассказы
Сказка о потеренном времени Шварц Е. сказка
Ну, погоди Камов Ф. Курляндский А.
Хайт А. сказка по мультфильму
#include <iostream>
using namespace std;
pair<float, float> function_frac(float A, float B, float C, float D) {
return make_pair((A * D) / (B * C), (A * C) / (B * D));
}
int main()
{
setlocale(LC_ALL, "Russian");
float A;
cout << "Введите A:";
cin >> A;
float B;
cout << "Введите B:";
cin >> B;
float C;
cout << "Введите C:";
cin >> C;
float D;
cout << "Введите D:";
cin >> D;
pair<float, float> pair_F = function_frac(A, B, C, D);
cout << "Деление дроби на дробь равно: " << pair_F.first << endl << "Умножение дробей равно: " << pair_F.second;
}
Обьект управления: петух.
Управляющее воздействие:
звуковое.
Я так думаю:))))
8 бит=256 вариаций или цветов.а значит объём видеопамяти 640*350*8=1792000бит.