Переменные: number,a,b,c,max,counter тип целочисленный
<h3><em>Начало</em></h3>
Ввод значения number
a = number целочисленное деление на 100
b = (number целочисленное деление на 10) остаток от деления на 10
c = number остаток от деления на 10
если (a больше b) и (a больше c) то
max = a
если (b больше a) и (b больше c) то
max = b
если (c больше b) и (c больше a) то
max = c
если a = max то
counter = counter + 1
если b = max то
counter = counter + 1
если c = max то
counter = counter + 1
Вывод значения counter
<h3><em>Конец</em></h3>
Var r,h:integer;
v1,v2:real;
begin
writeln('Ввод радиуса: ');
readln(r);
writeln('Ввод высоты цилиндра: ');
readln(h);
v1:=2*pi*r*h;
v2:=4/3*pi*(r*r);
if v1>v2 then write('Объем цилиндра больше')
else write('Объем шара больше');
end.
Множество-это совокупность объектов,определённая некоторым правилом.
3D от англ 3-dimentional (Трехмерный). 3D Модель - изображение какого-либо объекта в 3-х мерном пространстве, то есть у которого есть 3 измерения: длина, ширина, высота. 3D моделью можно считать любой предмет окружающего мира, так как у всех окружающих нас предметов есть длина, ширина и высота.
Это можно легчайшем образом сделать в панели создания таблицы, там будет написано в столбцах!