Вычисли сумму s=∑k=1nk+1k2+1, если значение n вводит пользователь. Если n=7, то вывод на экран (ответ округли до сотых)

Ответы

program c1;

var

a,k: integer;

begin 

writeln( ' введите число в диапазоне от 1 до 10: ')

read(a);

if ((a< =10) and (a> =1)) then k: =a*a*a else write (' введённое число не входит в диапазон чисел');

end.

всего три числа?

решу с рандомным

 

на паскале:  

 

var

a,b,c: integer;

min, max: integer;

 

begin clrscr;

 

a: =random(10)+0;

b: =random(10)+0;

c: =random(10)+0;

 

if (a< b) and (a< c) then

  min: =a

else

  if (c< a) and (c< b) then

  min: =c

  else

  min: =b;

 

if (a> b) and (a> c) then

  max: =a

else

  if (c> a) and (c> b) then

  max: =c

  else

  max: =b;

 

writeln('максимальное: ',max);

writeln('минимальное: ',min);

 

readkey;

end.

2*3=6

512*128*6=393216

393216: 1024=384кб

Найдено 3 ответ(ов)
Показать ответы
Знаешь ответ?

Похожие вопросы:

650 мбайт =5 452 595 200 бит n=5000 5452595200/60=90876587страниц 90876587/200=454382 книг ответ: 454 382 книги можно напечатать...Подробнее
ответов: 2
Популярные вопросы