Помогите пожалуйста) Программирование Паскаль...

yulikasimaeva @yulikasimaeva

July 2022 1 10 Report

Помогите пожалуйста) Программирование Паскаль

Answers & Comments

DeSex ПаскальАВС.НЕТ

const
b=8;
var
a:array of integer:=(23,30,35,12);
c:array of integer:=(15,20,25,30);
i:integer;
y:real;

function pr(c:array of integer):integer;
var
i:integer;
begin
result:=1;
for i:=0 to 3 do
result:=result*c[i];
end;

begin
for i:=0 to 3 do
y:=y+a[i]+c[i];
y:=y/pr(c);
writeln('Y=',y);
end.

0 votes Thanks 1

More Questions From This User See All

yulikasimaeva August 2022 | 0 Ответы

Немецкий язык Заполните пропуски Frau Jansen _____ Baeckerin von Beruf, deshalb ...

рекомендуемые вопросы

rarrrrrrrr August 2022 | 0 Ответы

о чем должны позаботиться в первую очередь взрослые при организационном вывозе н...

danilarsentev August 2022 | 0 Ответы

Есть два станка на которых выпускают одинаковые запчасти один производит a запча...

myachina8 August 2022 | 0 Ответы

Найти по графику отношение V3:V1. В ответах написано 9, но нужно решение...

ydpmn7cn6w August 2022 | 0 Ответы

Choose the correct preposition: 1.I am fond (out,of,from) literature. 2.where ar...

millermilena658 August 2022 | 0 Ответы

Определите Как создавалась и кто создавал арабское государство в крации...

MrZooM222 August 2022 | 0 Ответы

Ч. Айтманов в рассказе "Красное яблоко" использует метод рассказ в рассказе. Опи...

timobila47 August 2022 | 0 Ответы

каково было назначение каждой из частей византийского храма? помогите пожалуйста...

ivanyyaremkiv August 2022 | 0 Ответы

Участник Знаний August 2022 | 0 Ответы

Пожалуйста!!!!!!!!!!!!...

sarvinozwakirjanova August 2022 | 0 Ответы

помогите пожалусто пж...

Helpful Links

Политика конфиденциальности

Правила и условия

Контакты

Helpful Social

Copyright © 2025 SCHOLAR.TIPS - All rights reserved.