Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.78/9: Рейтинг темы: голосов - 9, средняя оценка - 4.78
 Аватар для spite
9 / 9 / 3
Регистрация: 17.05.2011
Сообщений: 284

Определить, сколько метров ткани по k руб и по d руб привезли в магазин

06.12.2011, 19:30. Показов 1826. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
В магазин привезли ткань по k руб за метр и ткань по d руб за метр- всего на сумму s1 и s2 руб соответственно. Сколько метров ткани по k руб и по d руб привезли в магазин.
у меня там 2 варианта 1 )s1/k и s2/d. 2)s1=k*m и s2=d*n.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
06.12.2011, 19:30
Ответы с готовыми решениями:

В магазине продается костюмная ткань. Ее цена b руб. за кв. метр. Подсчитать стоимость куска этой ткани длиной Х м и шириной У м.
1. В магазине продается костюмная ткань. Ее цена b руб. за кв. метр. Подсчитать стоимость куска этой ткани длиной Х м и шириной У м. 2....

Определить, сколько можно купить мороженного на оставшиеся деньги по K руб за штуку
Вася Курочкин отмечает свой юбилей. У него в кошельке Z рублей. Для праздничного стола он купил 2 торта по X руб, 6 бутылок сока по Y...

По данному Р определить, через сколько месяцев размер вклада превысит 1100 руб.
Здравствуйте, помогите пожалуйста написать программы на языке паскаль.Заранее благодарю. Начальный вклад в банке равен 10000 руб. Через ...

1
--\.founder./--
 Аватар для WebMax 2.0
565 / 565 / 392
Регистрация: 20.10.2011
Сообщений: 867
06.12.2011, 19:39
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Uses crt;
 
var k,d,s1,s2,y1,y2:real;
 
 
 
begin
    clrscr;
    Write('Ââåäèòå ñòîèìîñòü 1-é òêàíè: ');readln(k);
    Write('Ââåäèòå ñòîèìîñòü 2-é òêàíè: ');readln(d);
    Write('Ïîòðà÷åííàÿ ñóììà íà 1-þ òêàíü: ');readln(s1);
    Write('Ïîòðà÷åííàÿ ñóììà íà 2-þ òêàíü: ');readln(s2);
    y1:=s1/k;  y2:=s2/d;
    Writeln(y1:0:2,' ìåòð(à,îâ) 1-é òêàíè è ',y2:0:2,' ìåòð(à,îâ) 2-é òêàíè.');
    readln;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
06.12.2011, 19:39
Помогаю со студенческими работами здесь

Определить сколько будут стоить обои для всей стены, если цена одного рулона К руб
Хозяин хочет обклеить обоями длинную стену в своем доме. Длина этой стены равна А и высота В. Рулон обоев имеет длину 12 м и в ширину 1 м....

Ввести целое число-цену товара в рублях (от 1 руб до 999999999 руб) и дать словесное описание цены
надо ввести целое число-цену товара в рублях (от 1 руб до 999999999руб).и дать словесное описание цены. например 1 рубль , 145 рублей.

Сколько нужно рулонов обоев для оклейки комнаты длиной m метров, шириной n метров и высотой h метров?
1. Одна задача - одна тема. Тем более что картинку вы не вложили. 2.Сколько нужно рулонов обоев для оклейки комнаты длиной m метров,...

Сколько денег должен сдать сдачи продавец (или спросить еще) за покупку журналов по a руб. и h книг по b руб.?
Сколько денег должен сдать сдачи продавец (или спросить еще) за покупку журналов по a руб. и h книг по b руб., если покупатель дает d руб?...

1)Покупатель должен заплатить в кассу S руб.У него имеются купюры по 1,5,10,50,100,500,1000 и 10 000 руб.Сколько купюр разного достоинства отдаст поку
1)Покупатель должен заплатить в кассу S руб.У него имеются купюры по 1,5,10,50,100,500,1000 и 10 000 руб.Сколько купюр разного достоинства...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Символьное дифференцирование
igorrr37 13.02.2026
/ * Программа принимает математическое выражение в виде строки и выдаёт его производную в виде строки и вычисляет значение производной при заданном х Логарифм записывается как: (x-2)log(x^2+2) -. . .
Камера Toupcam IUA500KMA
Eddy_Em 12.02.2026
Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу
zbw 12.02.2026
И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.
«Знание-Сила»
zbw 12.02.2026
«Знание-Сила» «Время-Деньги» «Деньги -Пуля»
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров
8Observer8 12.02.2026
Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image)
8Observer8 11.02.2026
Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .
SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image
8Observer8 10.02.2026
Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .
Установка Qt-версии Lazarus IDE в Debian Trixie Xfce
volvo 10.02.2026
В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru