Может получиться так:
//Pascal ABC.NET v 3.3
var
x, s: integer;
begin
readln(x);
s := (x div 100) + (x mod 100) + (x mod 10);
writeln(s);
end.
25 перемнная______________________
#include <iostream>
using namespace std;
int main() {
int a[7], p = 1;
for( int i = 0; i < 7; i++ ) {
cin >> a[i];
if(a[i] > 0) p *= a[i];
}
}
<em><u>Получим значение 20.</u></em>
Формула вычисляет максимум из четырех значений: 4х[A1], [A1]x[B3], 9, 14.
Тут запись в квадратных скобках означает "содержимое ячейки с указанным адресом".
Максимум из 4х5, 5х4, 9, 14 - это максимум из чисел 20, 20, 9, 14 и он равен 20.