Регистрация
kirillefimov1
28.05.2023 06:09
Информатика
Есть ответ 👍

1.написать программу , которая вычисляет произведение цифр к-значного числа. 2. пусть элементами равносторон.треугольника являются : сторона a, высота h, площадь s, вписанная окружность r, описанная окружность r. составить программу , которая по заданному номеру и значению элемента , вычисляла бы значения всех остальных элементов

262
492
Посмотреть ответы 2

Ответы на вопрос:

koschka2000
koschka2000
4,5(93 оценок)
Решу только первую . const k=? ; {вместо "? " подставить любое  значение  k}  var x,i,s: integer; begin   write('x=');   readln(x);   s: =1;   for i: =1 to k do     begin     s: =s*(x mod 10);     x: =x div 10;     end;   writeln('s=',s); end.
Sabinakerimli
Sabinakerimli
4,7(53 оценок)
Pascal varn,m,i : integer; begin      readln(n);       readln(m);   m: =m * 60;         for i: =1 to n do          begin           m: =m+10;         end;         write(m div 60+' часа(ов)'); end.

Популярно: Информатика