обозначи кол-во цветков, распустившихся позавчера за x, вчера - за (x - 11) (по условию). вчера распустилось на 11 цветков меньше, чем позавчера и на 32 меньше, чем сегодня и позавчера вместе.подставим x=12 (> 11) - цветков вчера, значит 12-11=1 - цветков завтра. цветков сегодня находим так: 32 (дано) - 11 (дано) = 21.
ответ:
позавчера - 12 цветков.
вчера- 1 (12 - 11 = 12+ 21 - 32) цветок.
сегодня - 21 цветок.
Ответ дал: Гость
пример программы для паскаль
program a;
const n = 50; vari: byte; b: array[1..n] of word; procedure proc(a: array of word); beginfor i: =1 to n doif((129 < = a[i]) and (a[i] < = 160)) or ((161 < = a[i]) and (a[i] < =175)) or ((225 < = a[i]) and (a[i] < = 242)) thenwriteln('index = ',i+1,'; bukva - ''',char(a[i]),'''',' a[i] = ',a[i]); end;
beginwriteln; for i: =1 to n do b[i] : = random(300); for i: =1 to n do begin write(' ',i,' = ',b[i]); if (i mod 5 = 0) then writeln; end; writeln; writeln; proc(b); readln;
end.
Ответ дал: Гость
1) program imja_program
2) var imja_peremennoj: tip_peremennoj
3)integer,byte,real,long, short и еще какие-то но вряд ли будешь их использовать
более подробно смотри в википедии
Ответ дал: Гость
не трундая . приступим.
пусть а - первое число, б - второе число, с - третье число.
четное число - 2n
if (a+b+c) div 2 = 0 then writeln ('их сумма четное число') else writeln ('их сумма нечетное число');
Популярные вопросы