Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
в феврале 1946 года был создан первый компьютер.
№1
program z1;
var n: integer;
begin
write ('введите число n: ');
readln(n);
if (n mod 2 = 0) and (n div 100 < 1) and (n > 9) then write('данное число является четным двузначным') else if (n div 100 < 1) and (n > 9) then write ('данное число не четное двузначное');
end.
№2
program z2;
var a, b, c, k: integer;
k: =0;
writeln ('введите числа a, b и c: ');
readln(a,b,c);
if a< 0 then k: =k+1;
if b< 0 then k: =k+1;
if c< 0 then k: =k+1;
write('количество отрицательных чисел: ',k)
16*2*60/8 мего байт
00-ff - стандартная кодировка оттенков серого
Популярные вопросы