tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Другие предметы
Имеется 100 руб. Сколько
Имеется 100 руб. Сколько быков, коров и телят можно купить на все эти деньги, если плата за быка – 10 руб., за корову – 5 руб., (программа Паскаль)
Shokzzz
3 16.04.2019 23:00
15
Ответы
YanaTsaruk
16.04.2019 23:00
program z1;
uses crt;
var a,b,c:integer;
begin
for a:= 1 to 10 do
for b:=1 to 20 do
for c:=1 to 200 do с:= 100-(a+b);
begin
if (a+b+c=100)and (a*10+b*5+c*0.5=100) then if (a*10+b*5+c*0.5=100)
writeln (a:6,b:6,c:6);
end;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Другие предметы
denisвопрос
26.10.2020 11:45
Суйломдун эмир тап? Жакшы - Элина дайыма алга суройт....
ммаа2
26.10.2020 11:46
Как я влияю на окружающую среду мини сочинение...
lisakiss1
26.10.2020 11:46
составить графический алгоритм определения максимального элемента массива D(n) на отрезке от - 27 до 124...
begimay0424
26.10.2020 11:46
Продаю анимацыю за 500 рублей...
Аниса2111
14.04.2020 08:28
После урока: «Волейбол» ответьте на следующие во Размеры площадки для игры в волейбол? 2. Высота сетки для женщин и мужчин? 3. Сколько игроков в волейбольной команде? 4....
Расулев
14.04.2020 08:29
сделать тест по физкультуре. Тест на тему «Бег на 60 м»! 1. Бег на 60 м:А) Входит в программу чемпионата мира и Европы;Б) Норматив в сдаче норм ГТО «по выбору»;В) Дисциплина...
urukhaiz
20.03.2021 17:48
с инжеркой.Нужно заменить вид спереди фронтальным разрезом ...
08987654321
20.03.2021 17:57
Какие архитектурные сооружения охроняются государством в Костромской облости...
Тимур00000000
20.03.2021 17:59
5.Характеристика политический действий...
annzhoravel461
30.03.2021 16:25
Автобус масою 12 тонн, рушає з місця з прискоренням 0.5м/с^2.Визначте силу, якщо коефіцієнт тертя дорівню 0.3...
Популярные вопросы
За 4 часа теплоход км за сколько часов он пройдёт с той же скоростью 238...
3
Современная изучает: а) вновь открытые земли б)методы поиска и добычи...
2
Однокоренное слово к слову посмотри...
3
(14347-15673: 7 +17267)*6-36012: 6= 3*(10528: 8+7255): 9*100-30807: 3=...
1
Вкаком году рим будет отмечать 3000 лет...
1
Сочинение на тему моя любимая книга 15 предложений название волшебник...
3
Книга в деревне что свет в окошке.объясни пословицу...
3
Давайте посчитаем деньги. валютой будет рубль. ответ напишите только цифрой....
1
Какой обём кисорода потребуется для окисления 18г углерода...
2
Значение слов заклички, лукошко, невзгодою...
2
uses crt;
var a,b,c:integer;
begin
for a:= 1 to 10 do
for b:=1 to 20 do
for c:=1 to 200 do с:= 100-(a+b);
begin
if (a+b+c=100)and (a*10+b*5+c*0.5=100) then if (a*10+b*5+c*0.5=100)
writeln (a:6,b:6,c:6);
end;
end.