Var n,m : Integer;
Begin
Write (' введите N: '); Readln (n);
Write (' введите M: '); Readln (m);
Writeln ((n+m)*(m-n+1) div 2);
end.
Ответ:
Паскаль
Program krug;
var r,d:real;
Begin
writeln ('Введите радиус круга ');
readln(r);
d:=2*r;
write ('Диаметр круга равен ', d);
End.
Объяснение:
Незнаю как тебе объяснить, сам до конца не понял как не целые числа переводить.
12/8 = 1 остаток останется 4
1/8 = 0 остаток останется 1
12 в 10-тичной = 14 в 8-ричной
Теперь переводим дробную часть 12.5 в 10-тичной системе в 8-ую систему:
0.5·8 = 4.0
0.510 = 0.48
как то так.... я не уверен, вроде правильно.
<span>
</span>Заранее приготовьте кипяченую воду, добавьте в неё 1 ч.л. соли и размешайте. Насыпьте в миску нужное колличество мукислегка взбейте яйцо и вылейте в муку,положите подсолнечное масло и начинайте лить кипяченую воду и размешивать ложкой муку до однородной массы,далее собирите тесто, выложите его на стол и начинайте вымешивать, если будет прилипать к рукам, добавьте муки, вам придется приложить не много усилий, чтобы тщательно вымесить тесто до гладкого состояния. <span>Тесто должно быть не мягкое, но и не слишком тугое. Тесто положите в холод на 1 час.
</span><span>
Приготовьте мясо, я беру 400 грамм свинины и 400 грамм индейки, помелите вместе с луком на мясорубке, посолите, поперчите и добавьте мелко порезанную зелень. Для тех кто любит пожирнее, добавьте небольшой кусочек сала в мясорубку.
</span><span>Как приготовить пельмени - рецепт пельменей с фото
</span>После того как тесто полежало в холоде, начинайте лепить пельмени. У вас есть два варианта, раскатать скалкой большой пласт и вырезать рюмкой ровные кружки для пельменей. Я не люблю отходы, поэтому делаю из теста длинную тонкую колбаску. Режу её на кусочки по 1 см.,обваливаю их в муке и раскатываю, так и тесто не успевает засыхать и отходов не остается! Для того чтобы тесто не прилипало стол, скалку и доску для пельменей тщательно посыпайте мукой.Кладите мясо и тщательно разминайте края пельменей, так они не будут развариваться и будут очень нежными.<span>Воду для пельменей поставьте заранее, посолите её и положите лавровый лист. Выложите пельмени в кипящую воду, когда вода закипит, проварите их 2-3 минуты и аакуратно шумовкой выложите в миску со сливочным маслом. Вкусные домашние пельмени готовы! Не забудьте положить пару сюрпризов для ваших друзей!</span>
Пишу на QBasic
массив создан и заполнен
PRINT "Введите количество элементов массива"
INPUT N
MIN= 150
FOR I = 1 TO N
IF I <MIN AND I>0 THEN
MIN = I
END IF
NEXT I
PRINT MIN