Напишите программы паскаль abc 50создать программу, используя записи расчета расхода бензина, если известны пробег и норма расхода бензина. 51создать программу, используя записи расчета фонда заработной платы, если известны количество отработанных часов и часовая тарифная ставка. 41создать программу считающую сумму элементов массива в диапазоне от 5 до 7.

190

243

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

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

mikhaillukashc

Информатика

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

//pascal abc.net 3.1 сборка 1219 //50 var a,b: real; begin read(a,b); writeln(a*b); end. //51 аналогично 50 //41 var ar: array[1..10] of integer; i,k: integer; begin randomize; k: =0; writeln('array: '); for i: =1 to 10 do begin ar[i]: =random(10); write(ar[i]: 4); end; for i: =5 to 7 do k: =k+ar[i]; writeln; writeln('res=',k); end.