Воспользоваться оператором IF
IF a[i]>0
then writeln(a[i];
IF (a[i] mod 5=0)
then writeln(a[i];
24710 = 2*5*7*353
-----------------------------------------------------
N=2 24710 (10cc) = 10000010000110 (2cc)
N=5 24710 (10cc) = 1242320 (5cc)
N=7 24710 (10cc) = 132020 (7cc)
N=14 24710(10cc) = 9010 (14cc)
N= 35 24710 (10cc) = K60 (35cc)
---------------------------------------------
ответ: N1=2 N2=5 N3=7 N4=14
Program lol;
var a,h,s:real;
begin
writeln ('Введіть сторону');
readln (a);
writeln ('Введіть висоту');
readln (h);
s := 0.5*a*h;
writeln ('Площа трикутника: ' ,s,'кв см');<span>
end.</span>
1. Скретч
2. Какие смайлы можно использовать, а какие нет
3. Как делать презентации
4. Поведение в интернете
5. Поведение за компом