Разработать схему алгоритма, который запрашивает массив из N целых чисел, а затем складывает все элементы с нечётными номерами и все элементы с чётными номерами и выводит на экран сообщение о том, чья сумма больше

1г углеводы - 4,1 ккал

1 г жиров — 9,3 ккал

1 г белков — 4,2 ккал

Вычесления крайне простые,на пример возмем порцию картлофеля с маслом:

1.

От белков : 2,7г*4,2ккал/г=11.34ккал

От углеводов:39г*4.1ккал/г=159.9ккал

От жиров:7г*9.3ккал/г=65.1ккал

2.Общая калорийность блюда

11.34+159.9+65.1=236.34(кка)

3.Если в обед входят ещё какие блюда то сумируешь их энергетические ценности каждого компонента(б,угл,ж).

4.Суммируешь общую каллорийность блюд .

Здесь главное продумать структуру таблицы .

program ex1;                                          Здесь название программы

var i:real;                                                  вводишь переменные

begin                                                        открываешь тело программы

i:=3

while i<7 do                                                   задаешь цикл 

begin

writeln(i);                                                  вывод числа

i:=i+0.2 ;                                                    задаешь шаг цикла

end;                                                           закрываешь цикл

end.                                                             закрываешь тело программы