Var sum, count, t : integer; begin sum : = 0; count : = 0; while not eoln do begin read (t); if t > 0 then begin sum : = sum + t; count : = count + 1; end; writeln (sum, ' ', count); end. если количество элементов указано var sum, count, t, n, i : integer; begin sum : = 0; count : = 0; read (n); for i : = 1 to n do begin read (t); if t > 0 then begin sum : = sum + t; count : = count + 1; end; writeln (sum, ' ', count); end.
Ryazanova1575
21.03.2022
#include < iostream> using namespace std; int main() { int a, b; cout < < "a = ", cin > > a, cout < < "\n"; b = a/1000; cout < < b < < "\n"; b = a/100 % 10; cout < < b < < "\n"; b = a % 100 / 10; cout < < b < < "\n"; b = a % 10; cout < < b < < "\n"; return 0; } пример: a = 70527 0 5 2
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Даны x y. составить программу вычисления значения выражения |x|-|y|/1+|xy|