Втаблице dat хранится положительные или отрицательные целые числа. определите, что будет напечатано в результате работы следующей программыю. текст программы на пяти языках программирования. паскаль var k, m: integer; dat: array[1..10] of integer; begin dat[1]: = -5; dat[2]: = 4; dat[3]: =
-3; dat[4]: = 2; dat[5]: = 7; dat[6]: = -1; dat[7]: = 9; dat[8]: = 8; dat[9]: = 7; dat[10]: = 4; m: = 0; for k: = 1 to 10 do begin if dat[k]*m < 20 then begin m: = dat[k] end; wrieln(m); end.
int main()
{
int
number,
val,
digits;
bool query[2]{false, false};
std::cout << "Введите число: ";
std::cin >> number;
std::cout << std::endl << "Введите цифру, которую нужно найти в числе: ";
std::cin >> val;
while(number)
{
digits = number % 10;
number /= 10;
if(digits == 3)
query[0] = true;
else if(digits == val)
query[1] = true;
}
if(query[0])
std::cout << "Число 3 входит" << std::endl;
else std::cout << "Число 3 не входит" << std::endl;
if(query[1])
std::cout << "Число " << val << " входит" << std::endl;
else std::cout << "Число " << val << " не входит" << std::endl;
}