• MONEY за подписку! Ничего делать не надо совсем, всего-то подписаться на тг одмена и нажать кнопку "Принять участие" в розыгрыше: https://t.me/govthing/7650

Вопрос Боги Паскаля помогите с задачей

Памагите
Пользователь
Пользователь
Статус
Оффлайн
Регистрация
15 Апр 2021
Сообщения
334
Реакции
55
Желательно последнюю, которая на 5. Но можно и на 4 сделать
IMG_20221130_124817.jpg
 
4-ое задание
1669793589547.png

Подходит ?
 
Последнее редактирование:
Желательно последнюю, которая на 5. Но можно и на 4 сделать
Посмотреть вложение 229887
Забыл сделать произведение.
Исправил свой ответ.
c += 1; и c -= 1; Нужны для того чтоб найти произведение ибо нельзя умножать на ноль.
Желательно последнюю, которая на 5. Но можно и на 4 сделать
Посмотреть вложение 229887
1669793748528.png

Вот что выводит в онлайн компиляторе
 
#5:
bro:
Expand Collapse Copy
Program Dolboeb(vnaturi);
    var
    values: array[0..99] of integer;
    idx: integer;
    sum: integer;
    begin
    for idx:=0 to Length(values) do
    begin
    values[idx] := random( 145 ) - 45;
    writeln(values[idx]);
    if values[idx] mod 2 = 0 then
        begin
        sum+=values[idx];
        end;
    end;
    writeln(sum);
end.
 
На Golang, или Java, если будут вопросы, то подскажу). А паскаль мертв:D, нафиг он нужен
 
На Golang, или Java, если будут вопросы, то подскажу). А паскаль мертв:D, нафиг он нужен
На C++, или Rust, если будут вопросы, то подскажу). А Java мертв:D, нафиг он нужен
 
Назад
Сверху Снизу