Авторизация Регистрация
  • Математика
  • Литература
  • Алгебра
  • Русский язык
  • Геометрия
  • Английский язык
  • Химия
  • Физика
  • Биология
  • Другие предметы
  • История
  • Обществознание
  • Окружающий мир
  • География
  • Українська мова
  • Информатика
  • Українська література
  • Қазақ тiлi
  • Экономика
  • Музыка
  • Право
  • Беларуская мова
  • Французский язык
  • Немецкий язык
  • МХК
  • ОБЖ
  • Психология
  • Математика
  • Литература
  • Алгебра
  • Русский язык
  • Геометрия
  • Английский язык
  • Химия
  • Физика
  • Биология
  • Другие предметы
  • История
  • Обществознание
  • Окружающий мир
  • География
  • Українська мова
  • Информатика
  • Українська література
  • Қазақ тiлi
  • Экономика
  • Музыка
  • Право
  • Беларуская мова
  • Французский язык
  • Немецкий язык
  • МХК
  • ОБЖ
  • Психология
  • Главная
  • /
  • Информатика
  • /
  • Составить программу вычис...
Информатика, 27.02.2019 20:50, Катя881118

Составить программу вычисления среднего , набранного спортсменом - многоборцем (предусмотреть 3 вида спорта) это паскаль

Всего ответов: 4
Посмотреть ответы

Ответы

Ответ разместил: Nika1337228

program srednball;

var a,b,d : integer;

        c : real;

begin

    writeln (' vvedite balli, nabrannie sportsmenom po 3 vidam sporta');

    readln (d);

    readln (a);

    readln (b);

    c: =(a+b+d)/3;

    writeln (' srednii ball= ', c: 4: 2);

    readln;

end.

Спасибо
Ответ разместил: Гость

1. program ostatok;

uses crt;

var a,b,ost: real;

begin

write('a= ');

readln(a);

write('b= );

readln(b);

ost: =a mod b;

write('ostatok ot delenia a na b raven ',ost);

readln;

end.

 

2. program modul;

uses crt;

var a,b,c,d: real;

begin

write('a= ');

readln(a);

write('b= );

readln(b);

c: =a-b;

if c> 0 then

begin

a: =abs(a+b);

b: =abs((a-b)/2);

write('a= ',a,'b= ',b);

end

else

b: =abs(a+b);

a: =abs((b-a)/2);

write('a= ',a,'b= ',b);

end;

readln;

end.

Ответ разместил: Гость

путь к файлу вместе с именем файла называют полным именем файла. то что вы написали и есть полное имя файла. а вот собственно имя   - это proba и расширение txt. 

Другие вопросы по: Информатика

Надо удалить вот эту вкладку или что !...
  • Ответов: 3
  • 13.03.2019 10:48
Информатика
Влыжной гонке участвуют 240 спортсменов. специальное устройство регистрирует прохождение каждым участником промежуточного финиша, записывая его номер цепочкой из "0" и "1" минималь...
  • Ответов: 3
  • 14.03.2019 21:20
Информатика
Составьте программу, которая позволяет получить из слова" программирование" слова " программа" и "мир" путем удаления символов. паскаль....
  • Ответов: 1
  • 18.03.2019 06:50
Информатика
Краткое название клавеши с помщью которой можно удалить символ располженный правее курсора 3буквы...
  • Ответов: 3
  • 19.03.2019 05:10
Информатика
Вычислите массу кислорода выделившегося в результате разложения порции воды массой 9 г...
  • Ответов: 1
  • 19.03.2019 08:50
Информатика
Перевести в десятичную систему счисления число (24е)16...
  • Ответов: 2
  • 24.03.2019 10:07
Информатика
Знаешь правильный ответ?
Составить программу вычисления среднего , набранного спортсменом - многоборцем (предусмотреть 3 вида...

Популярные вопросы

.(Цену товара сперва снизили на 20%, затем новую цену снизили еще на 15% и, наконец, после перерасчета произвели снижение еще на 10%. на сколько процентов всего снизили первоначаль...
  • Ответов: 2
  • 27.02.2019 14:10
Математика
Слова объединены в группы, так как в каждом слове есть один и тот же согласный звук. найди этот звук, записав слова с транскрипции 1)книжка, камыш, шар, частушка, шкатулка 2)рукав...
  • Ответов: 3
  • 28.02.2019 11:50
Русский язык
.(Автомобиль за первый час проехал 56 км, что составило 7/8 того пути, которыйон проехал за второй час. за третий час автомобиль проехал 0,75 пути ,который он проехал за второй час...
  • Ответов: 2
  • 28.02.2019 13:20
Математика
Составьте распространённые предложения так чтобы, слово родина в первом из них было подлежащим, во втором - дополнением, в третьем- обстоятельством, в четвёртом-обращение....
  • Ответов: 3
  • 01.03.2019 09:00
Русский язык
Сочинение на тему летняя ночь со словам тишь, глушь, ночь, полночь, сыч, камыш, рожь, дрожь....
  • Ответов: 2
  • 02.03.2019 11:20
Русский язык
Надо сочинение на тему: "почему надо птицам"...
  • Ответов: 2
  • 02.03.2019 11:50
Биология
Какие отношения складываются между человеком и природой на различных этапах развития человеческой цивилизации...
  • Ответов: 2
  • 02.03.2019 15:10
Биология
Диалог на тему: shopping используя как можно больше слова: must, could, can, should...
  • Ответов: 1
  • 03.03.2019 01:00
Английский язык
Начертить квадрат периметр которого 3см 6мм...
  • Ответов: 3
  • 06.03.2019 23:40
Математика
Плоскость альфа пересекает стороны ab и bc треугольникаabc в точках d и e соответственно , причём ac параллельно альфа. найдите ac , если bd: ad=3: 4 и de=10 см...
  • Ответов: 2
  • 07.03.2019 13:10
Геометрия
Больше вопросов по предмету: Информатика Случайные вопросы

Популярные вопросы

  • .(Цену товара сперва снизили на 20%, затем новую ц...
  • Слова объединены в группы, так как в каждом слове...
  • .(Автомобиль за первый час проехал 56 км, что сост...
  • Составьте распространённые предложения так чтобы,...
  • Сочинение на тему летняя ночь со словам тишь, глуш...
  • Надо сочинение на тему: "почему надо птицам"...
  • Какие отношения складываются между человеком и при...
  • Диалог на тему: shopping используя как можно боль...
  • Начертить квадрат периметр которого 3см 6мм...
  • Плоскость альфа пересекает стороны ab и bc треугол...
Регистрация

Некий текст регистрация

Есть аккаунт? Авторизация
Ошибка : произошел сбой, повторите позже.

Есть аккаунт? Авторизация
Авторизация

Некий текст логин

Регистрация
Ошибка : произошел сбой, повторите позже.

Забыли пароль?

Don't have account, Регистрация
Восстановление пароля

Некий текст восстановления

Ошибка : произошел сбой, повторите позже.

Have an account? Sign In Now
Задайте свой вопрос эксперту
Ваше имя
Email
Вопрос
Предмет
Ваш вопрос слишком короток
Отправить
Вопрос отправлен эксперту. Вы получите ответ на почту.
OK