Определить количество чисел от 10 до 50, сумма которых равна 5 надо написать в системе паскаля

215

450

Посмотреть ответы 2

Ответы на вопрос:

nikitasolyny

Информатика

4,8(23 оценок)

Program z1; var k,n,a,b,c: integer; begin for k : =10 to 50 do begin a: =k mod 10; b: =k div 10; c: =a+b; if c=5 then n: =n+1; end; write (n); end.

МамаРодиМеняОбратно

Информатика

4,7(32 оценок)

Прежде всего, авторством. древние не отмечали автора.бумагой,древняя бумага была более плотной,а наша тонкая и порвать легко.в древней книге большинство книг состояло из не слов (65 %),та же война и мир.