var a,s:integer;
begin
s:=0;
writeln('Введите числа');
repeat
readln(a);
if (a>9)and(a<99) then
s:=s+a;
until a=0;
writeln(s);
end.
В цикле посчитать количество чисел при делении на которые не остаётся остатка от деления. Т.е. деление нацело происходит.
#include <stdio.h>
void main(void) {
int qty=0;
int x = 30000;
for (int i=1; i<=x; i++) { //Организовываем цикл от 1 до значения числа x
// Если x делится без остатка, значит число - натуральный <span>делитель.</span>
if (x % i==0)
qty++;
}
printf("количество натуральных делителей %i", qty);
}
К растровой (точечной), в которой изображение строится из точек, называемых пикселями (pixel - от англ. PICture ELement)
Клавиатуры имеют по 101-104 клавише, размещенных по стандарту QWERTY (в верхнем левом углу алфавитной части клавиатуры находятся клавиши Q, W, E, R, T, Y). Отличаются они лишь незначительными вариантами расположения и формой служебных клавиш, а также особенностями, обусловленными используемым языком.
Набор клавиш клавиатуры разбит на несколько функциональных групп:
<span><span> алфавитно-цифровые;</span><span> функциональные;</span><span> управления курсором;</span><span> служебные;</span><span> <span>клавиши дополнительной панели</span></span></span>
Program n1;
var s,s1,s2: string;
function max(a,b,c: integer): integer;
begin
max:=0;
if (a>b) and (a>c) then max:=a else
if (b>c) and (b>a) then max:=b else
if (c>a) and (c>b) then max:=c;
end;
begin
readln(s);
readln(s1);
readln(s2);
write(max(length(s),length(s1),length(s2)));
end.