ИнформатикаСоставить программу, используя цикл Для, - вопрос №133221202 от saaxst 20.02.2023 08:24

Question

Информатика: ИнформатикаСоставить программу, используя цикл Для, которая 2 числа введеные с клавиатуры увеличит на 5​

saaxst · Answer

var a, b: integer; beginread(a,b); for var i := 1 to 5 do begin a := a + 1; b := b + 1; end; writeln('a: ',a); writeln('b: ',b); end.

Хотя смысл, если можно так:

beginvar (a,b):=ReadInteger2; Println('a:',a+5);Println('b:',b+5);end.

Примеры работ:

ИнформатикаСоставить программу, используя цикл Для, которая 2 числа введеные с клавиатуры увеличит на 5​