begin for a : = 1000 to 9999 do begin c1 : = a div 1000; c2 : = (a div 100) mod 10; c3 : = (a div 10) mod 10; c4 : = a mod 10; if (c1 < > c2) and (c1 < > c3) and (c1 < > c4) and (c2 < > c3) and (c2 < > c4) and (c3 < > c4) then writeln(a); end; end.
Ответ дал: Гость
var a,b,c: array [1..100,1..100] of integer;
as,bs,cs,i,j: integer;
begin
sb: =1;
for i : = 1 to n do
for j: = 1 to n do
begin
if a[i,j]< 0 then sa: =sa+a[i,j];
if b[i,j]> 0 then sb: =sb*b[i,j];
if j=3 then sc: =sc+c[i,j];
end;
writeln(sa,sb,sc);
end.
Ответ дал: Гость
не знаю в каком виде это должно быть
1 ввод возрастов
2 если s> m то пишем "саша старше маши "
3 иначе если s=m то пишем "саша и маша ровестники"
4 иначе пишем "маша старше саши"
в первом нет строчки 3
Ответ дал: Гость
Есть два типа исполнителей, формальные и неформальные. формальные исполняют ровно то, что им приказывают, и имеют конечный список допустимых инструкций. неформальные исполнители сами решают, как им достичь цели, пути, как они этого добиваются, могут изменяться. формальные исполнители: - избушка (избушка становится к лесу задом, а к говорящему передом) - печь (на которой катался емеля) неформальные исполнители: - бабка (которую дед попросить испечь колобок) - василиса премудрая (которая в форме лягушки выполняла приказы короля, которые ей передавал иван-царевич)
Популярные вопросы