М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
kvm1
kvm1
14.10.2022 09:57 •  Информатика

сделать задание по программированию (Питон) Нужно решить алгоритм, составить и написать программу по блок-схеме:


сделать задание по программированию (Питон) Нужно решить алгоритм, составить и написать программу по

👇
Ответ:
yadlos38
yadlos38
14.10.2022

8 - 40

25 - 27

0 - 2

v = input()

if v%5==0:

v+=2

else:

if v<20:

v*=5

else:

v/=5

print(v)

4,6(98 оценок)
Открыть все ответы
Ответ:
djuraev488
djuraev488
14.10.2022

Program P1;

 

Uses Crt; {можно и не использовать, без оной clrscr -  видаст ошибку, что нет такого}

 

Var a,p: Real;
    n,i: Integer;

 

Begin
    ClrScr; {просто чтобы очистить экран можно и не использовать}
    Write('Type a: '); Read(a);
    Write('Type n: '); Read(n);
    for i:=1 to n do
    begin
        p:=p+(a*(a-i*n)*(a-n*n));
        {не совсем понятны три точки в условии}
    end;
    Writeln('p=', p:3:3); {количество знаков после запятой и общее}
    Readkey; {или можно использовать Readln;}
End.

4,6(46 оценок)
Ответ:
sainegorova201
sainegorova201
14.10.2022

Program P1;

 

Uses Crt; {можно и не использовать, без оной clrscr -  видаст ошибку, что нет такого}

 

Var a,p: Real;
    n,i: Integer;

 

Begin
    ClrScr; {просто чтобы очистить экран можно и не использовать}
    Write('Type a: '); Read(a);
    Write('Type n: '); Read(n);
    for i:=1 to n do
    begin
        p:=p+(a*(a-i*n)*(a-n*n));
        {не совсем понятны три точки в условии}
    end;
    Writeln('p=', p:3:3); {количество знаков после запятой и общее}
    Readkey; {или можно использовать Readln;}
End.

4,6(75 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ