program ; var n : integer; begin for n: = 10 to 99 do if n mod 13 = 0 then writeln(n); readln; end.
shangina1997507
24.03.2023
program mdd; uses crt; var i: longint; beginclrscr; for i: = 10 to 99 dobeginif i mod 13 = 0 then writeln(i); end; readkey; end.
bolosolo77
24.03.2023
Var i, j, o, n: integer; begin n : = 1; for i : = 1 to 25 do for j : = 1 to 25 do for o : = 1 to 25 do begin writeln(n, ': ', i, ' ', j, ' ', o); inc(n); end; end.это всё выведет (можете массив сделать из названий блюд, но 25 я не придумаю), а количество можно так посчитать: 25 блюд по 3 штуки (если по одному блюду на завтрак, обед и ужин), то блюд: )
ivan-levermor
24.03.2023
Ответ: 2 программная среда, определяющая интерфейс пользователявот более правильное определение для справкиоперацио́нная систе́ма, сокр. ос (. operating system, os) — комплекс и обрабатывающих программ, которые, с одной стороны, выступают как интерфейс между устройствами вычислительной системы и прикладными программами, а с другой стороны — предназначены для устройствами, вычислительными процессами, эффективного распределения вычислительных ресурсов между вычислительными процессами и организации надёжных вычислений. это определение применимо к большинству современных операционных систем общего назначения.
program ; var n : integer; begin for n: = 10 to 99 do if n mod 13 = 0 then writeln(n); readln; end.