Rostique
Опубликовано 6 лет назад по предмету Информатика от Rostique


№1. Составить программу нахождения длины окружности и площади круга по указанному радиусу R.

№2. Дано трехзначное число. Найти произведение цифр числа.

№3. Меньшее из трех чисел увеличить в 3 раза.

 

  1. Ответ
    Ответ дан Sky09

    var r,l,s:real;beginwrite('R=');read(r);s:=pi*sqr(r);l:=2*pi*r;write('S=',s,';L=',l);end.

     

    var a,p:integer;beginread(a);p:=(a mod 10)*(a div 100)*(a mod 100 div 10);write(p);end.

     

    var a,b,c,min:integer;beginwriteln('Введи 3 числа');readln(a,b,c);min:=a;if b<min then min:=b;if c<min then min:=c;writeln(3*min:4);readln;end.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц