свойства алгоритма: дискретность, , массовость, детерминированность, конечность.
алгоритм:
1)взять линейку
2)найти длинный всех сторон
3)сложить все три строны треугольника
4)записать ответ
(извиняюсь если алгоритм не правильно написан, с не дружу)
Ответ дал: Гость
var a,b,s: integer; begin readln(a); while a> =10 do begin b: =a mod 10; s: =s+sqr(b); a: =a div 10; end; a: =a*a; s: =s+a; writeln(s); readln; end.в s накапливаем сумму квадратов, b это остатки от деления на десять, после цикла прибавляем последнюю цифру,которая меньше десяти, предворительно возведя её в квадрат!
Популярные вопросы