
Kicahshev
5 год назад
Var p, k: integer;beginp := 3;k := 0;while p <= 7 dobegink := k + p;p := p + 1end;
ОТВЕТЫ

Ruben
Nov 21, 2020
твоя программа ничего не выведит т.к нет writeln (я так понимаю это паскаль). В конце программы k = 25 p = 8
67
Смежные вопросы: