1. Напишите программу формирувания и вывода масси- ва произвольного размера так, чтобы каждый последую-
щий элемент, начиная с третьего, был равен сумме двух
предыдущих элементов, уменьшенной в два раза. Два
первых элемента задайте с клавиатуры.

139

417

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

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

khavra1991

Информатика

4,4(30 оценок)

Program zadanie; var n1,n2,a,b: integer; begin writeln('ввести два 3-х значных целых числа'); readln(n1,n2); a: =(n1 mod 100) mod 10; b: =(n2 mod 100) mod 10; a: =a+b; b: =a-b; a: =a-b; writeln('n1=',n1 div 10,a); writeln('n2=',n2 div 10,b); writeln('сумма этих чисел=',(n1 div 10)+(n2 div 10)+((a+b) div +b) mod 10); end.