var
A, B, C, i: Integer;
begin
Write ('Введите значение A: ');
ReadLn (A);
Write ('Введите значение B: ');
ReadLn (B);
Write ('Введите значение C: ');
ReadLn (C);
i := 0;
if A mod 2 = 0 then
Inc (i);
if B mod 2 = 0 then
Inc (i);
if C mod 2 = 0 then
Inc (i);
Writeln ('Количество четных чисел = ' + IntToStr (i));
end;
1) находим расстояния от начала координат до точек ( длины отрезков )
S = x^2+ y ^2 , где x и y - координаты двух точек
2) сравниваем их
1) верно
2) неверно, отсутствует тип элементов массива
3) неверно, кириллица в имени массива и другие ошибки
4) верно
При однобайтовой кодировке символа одно слово займет 8 байт. За минуту читается 160 слов, это 160х8=1280 (Байт).
7 часов - это 7х60=420 минут и за это время можно прочитать слова с общим объёмом 420х1280=537600 байт. 1 Кбайт равен 1024 Байта, поэтому объем в килобайтах составит 537600/1024=525 (Кбайт).
Ответ: 525 КБайт.
#include <iostream>
using namespace std;
int main()
{
double a, b, c;
cin >> a >> b >> c;
if ((a == b)||(b == c)||(a == c)) cout << "YES";
else cout << "NO";
}